Well,
I personally would write it differently,
while (<IN>) {
chop;
push @data, split /\,/,$_;
}
close IN;
That will accomplist the Same thing. You could also do it in one map
command if you would like...
#!/usr/bin/perl
map {chop; push @data, split /\,/;} <DATA>;
print @data;
__DATA__
"data1","data2","data3","data4","data5","data6","data7 ","data8"
"data1","data2","data3","data4","data5","data6","data7 ","data8"
"data1","data2","data3","data4","data5","data6","data7 ","data8"
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of
> Johnno
> Sent: Friday, March 29, 2002 5:09 AM
> To: [EMAIL PROTECTED]
> Cc: [EMAIL PROTECTED]
> Subject: Re: [Perl-unix-users] split command
>
>
> it is a basic text with about 9 lines or so of data and looks like this..
> but i have edited it a bit so you can get the general idea..
> other wise is
> would make the message a little messy.
>
> "data1","data2","data3","data4","data5","data6","data7 ","data8"
> "data1","data2","data3","data4","data5","data6","data7 ","data8"
> "data1","data2","data3","data4","data5","data6","data7 ","data8"
>
> Johnno
>
> ----- Original Message -----
> From: "Geoff Ellis" <[EMAIL PROTECTED]>
> To: "'Johnno'" <[EMAIL PROTECTED]>
> Sent: Friday, March 29, 2002 10:51 PM
> Subject: RE: [Perl-unix-users] split command
>
>
> > Johnno, could you show us a little more of how your data is laid out in
> the
> > file please... :o)
>
>
> _______________________________________________
> Perl-Unix-Users mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
