Johnno wrote:
> I am using this command and it works find...
>
> how would i change it so it would pick the ," and then do the split..
>
> at the moment it picks up the ,
>
> push @data, split /\,/,$_;
>
> Many thanks for all your help so far.
There are hundreds of ways to do it. You could read the lines into
an array and join them with a ','. Then do your split.
my @array = <IN>;
my $lines = join ',', @array;
my @data = split /,/, $lines;
--
,-/- __ _ _ $Bill Luebkert ICQ=14439852
(_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED]
/ ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl)
-/-' /___/_<_</_</_ Castle of Medieval Myth & Magic http://www.todbe.com/
_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
