Re: Even more regex

[Dave K]

Dan
> I have a string, which is to represent a length of time, say 3d4h45m12s
$ perl -e '
$v = "3d7h36m14s";
$v =~ s/d/*24*3600 +/;
$v =~ s/h/*3600 +/;
$v =~ s/m/*60 +/;
$v =~ s/s//;
$k = eval $v;
print "$v = $k seconds";'
3*24*3600 +7*3600 +36*60 +14 = 286574 seconds

And a question. Can the 4 $v =~ ... be further compacted/combined?
Dave



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]