Re: split question (boo)

split may not be so hot for this, especially behind an =~ operator... .
I'd suggest using a regex for this, something similar to :

my $inLine= "RPC, rpc #001b, (1987)";
$inLine=~/\((\d+)\)/;
print $1
[download]

or, if you really wanna use split,

my $inLine= "RPC, rpc #001b, (1987)";
($itm, $date)= split /[()]/, $inLine;
print $date;
[download]

but I'd shy away from that, personally.

Comment on Re: split question (boo) Select or Download Code

Replies are listed 'Best First'.
Re: Re: split question (boo) by chiller (Scribe) on Sep 08, 2001 at 03:44 UTC
Or if he really wants the "remainder": `my $inLine= "RPC, rpc #001b, (1987)"; $inLine =~ /([^(]+)$(\d+)$/; my ($remainder, $date) = ($1, $2);` [download] .. assuming $inline is the only line of data...	[reply] [d/l]