Re: Fetching a number

If your lines are always going to be 5 fields long...seperated by commas:

my ($s1, $s2, $s3, $pname, $index) = split(/,/, $line);
[download]

Update:
Or if the line looks exactly like

('AA', 'B','2','ProjectId','148')"> Unique Information Here (Index)
[download]

my ($before, $after) = split(/>/, $line);
my ($s1,$s2,$s3,$pname,$index) = split (/,/, $before);
and then just trim off the ',), and " characters from $index.
[download]

Comment on Re: Fetching a number Select or Download Code

In Section Seekers of Perl Wisdom