hey guys. ive been trying my had at modules, but no dice. heres what ive
got so far :
**
#!/usr/bin/perl -w
use lib "/usr/lib/perl5/site_perl/5.6.0";
use Mp3::Info;
print "What is the full name of the file you want to check up on
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
Well, there is always more than one way to do this. You may not be able to
do this easily without additional modules. Since you are working with CSV
data, check out DBI and DBD::CSV or DBD::Anydata or Anydata or Text::CSV_XS.
But if you absolutely do not want to use a module, then use regular
e
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.
Johnno
___
Perl-Unix-Users mailing l
Well,
I personally would write it differently,
while () {
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 /\,/;} ;
print @data;
__DATA_
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","da
I have opened up a file and use the
$lines = ;
close in;
then used
my @data = split (/\,/, $lines);
as the data is seperated with the ,
when i call $data[7] i get this which is part on the first line and the 2nd.
access_registration
eBay opens website for New Zealanders
the field $data[7] s
