Having just coded some more perl resplendent with this syntax:

  $in{pmonth}=$usr{paidon};
  $in{pmonth}=~s/^.+([A-Za-z]{3,3}).+$/$1/;

once again I'll suggest (then I quit)

$in{pmonth}=~s/^.+([A-Za-z]{3,3}).+$/$1/,$in{paidon};


is a LOT nicer, and more Perlish (see split) way of doing this. I'm tired of 
using two expressions for what should clearly be one.

________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

Reply via email to