Dan Muey wrote:
>
> if($c =~ m/0$|2$|4$|6$|8$/){ $c = $c - 3; }
A verbose way of saying:
if($c =~ /[02468]$/){ $c -= 3 }
Or:
if(!($c % 2)){ $c -= 3 }
:-)
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
