Too complicated for anything but perl (that I know of):
Code:
#!/bin/perl -w
format STDOUT_TOP =
Name Street Phone Mail Favorite thing
of what ever you
want
===============================================
.
@<<<<<< @<<<<<<< @<<<<<<< @<<<<<<< ^<<<<<<<<<<<<<<<
@line
~~ ^<<<<<<< ^<<<<<<<<<<<<...
$line[-1]
.
while (<>) {
@line=split(';');
write;
}
Few perl coders today even realize this is what perl was initially designed for. Ah the good old days.
(Seriously, I didn't start using perl until probably version 4.009).
Last edited by otheus; 01-29-2009 at 05:14 AM..
Reason: email is also wrapped; added header
I hope its ok to start a new thread, I was going to use my existing one but thought a new one would better clarify things and provide better search for future reference.
Well I have my bash program working now, all nice, user input validated, output formatted, everything is looking sexy.
Now... (2 Replies)
I am fairly new at this,
I wrote a awk program to give me some summary information about a file. At the end of the program I want to print some variables but for some reason it keeps wrapping the last variable on a new line in the output file.
Here is the print command
print "99", file_id,... (1 Reply)
Hi folks,
We want to protect our ksh scripts from our customers.We don't want to let them the option to viewor modify the scripts.
Is there a way ro wrap a ksh script?
Thanks in advance,
Nir (2 Replies)
I am very frustrated with this. I've added the following into my .profile and .bashrc:
#this one makes sure that long commands strings line wrap to the next line
&& return
#instead of wrapping onto the start of the same line.
shopt -s checkwinsize
However, it just never works for me.... (7 Replies)
Hi,
I want to wrap the lines if a line starts with number. I tried the following sed command, but I do not get the required output. It is replacing the first number.
Can some one please help me on this?
Command I used
sed -e :a -e '$!N;s/\n//;ta' -e 'P;D' testfile
I/P file:... (2 Replies)
I have a file where the text might exceed 80 characters. I want to have the maximum text lengths to be 80, and cut text from a space.
I written an awk script below but does not seem to work very well
{
gsub("\t"," ")
$0 = line $0
while (length <= WIDTH) {
line = $0
... (3 Replies)
I have a file that has the words I want to find in other files (but lets say I just want to find my words in a single file). Those words are IDs, so if my word is ZZZ4, outputs like aaZZZ4, ZZZ4bb, aaZZZ4bb, ZZ4, ZZZ, ZyZ4, ZZZ4.8 (or anything like that) WON'T BE USEFUL.
I need the whole word... (6 Replies)
Hi all,
Am trying to write a menu driven script using SELECT and if I have more than 4 options, it wraps to the next column. That is if I have 6 choices, items 5 and 6 are in the second column.
Is there any settings that control this behavior or is it due to some stty settings?
stty -a... (3 Replies)
Greetings,
I am by no means a Unix expert and hope that someone here can help me out.
I am sending an email from within a Progress character program. This works fine.
My issue is that I would like to send more than 80 characters and the email is wrapping at 80 chars.
Is this an email... (9 Replies)
Discussion started by: Nosredna
9 Replies
LEARN ABOUT OSX
mail::field::generic
Mail::Field::Generic(3) User Contributed Perl Documentation Mail::Field::Generic(3)NAME
Mail::Field::Generic - implementation for inspecific fields
INHERITANCE
Mail::Field::Generic
is a Mail::Field
SYNOPSIS
use Mail::Field;
my $field = Mail::Field->new('Subject', 'some subject text');
my $field = Mail::Field->new(subject => 'some subject text');
DESCRIPTION
A generic implementation for header fields without own implementation. This is fine for fields like "Subject", "X-Mailer", etc., where the
field holds only a string of no particular importance/format.
METHODS
Constructors
Mail::Field::Generic->combine(FIELDS)
See "Constructors" in Mail::Field
Mail::Field::Generic->extract(TAG, HEAD [, INDEX ])
See "Constructors" in Mail::Field
Mail::Field::Generic->new(TAG [, STRING | OPTIONS])
See "Constructors" in Mail::Field
"Fake" constructors
$obj->create(OPTIONS)
-Option--Default
Text ''
Text => STRING
$obj->parse([STRING])
Set the new text, which is empty when no STRING is provided.
Accessors
$obj->set(OPTIONS)
See "Accessors" in Mail::Field
$obj->stringify()
See "Accessors" in Mail::Field
$obj->tag()
Mail::Field::Generic->tag()
See "Accessors" in Mail::Field
Smart accessors
$obj->text([STRING])
See "Smart accessors" in Mail::Field
DIAGNOSTICS
Error: Undefined subroutine <method> called
Mail::Field objects use autoloading to compile new functionality. Apparently, the mehod called is not implemented for the specific
class of the field object.
SEE ALSO
This module is part of the MailTools distribution, http://perl.overmeer.net/mailtools/.
AUTHORS
The MailTools bundle was developed by Graham Barr. Later, Mark Overmeer took over maintenance without commitment to further development.
Mail::Cap by Gisle Aas <aas@oslonett.no>. Mail::Field::AddrList by Peter Orbaek <poe@cit.dk>. Mail::Mailer and Mail::Send by Tim Bunce
<Tim.Bunce@ig.co.uk>. For other contributors see ChangeLog.
LICENSE
Copyrights 1995-2000 Graham Barr <gbarr@pobox.com> and 2001-2007 Mark Overmeer <perl@overmeer.net>.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See
http://www.perl.com/perl/misc/Artistic.html
perl v5.16.2 2012-08-29 Mail::Field::Generic(3)
01-29-2009
