Problem:
I have a field $cusip that has to change from ABC123-XX-7 (9 characters with '-') to
ABC123XX (first 8 characters only without '-')
I have following lines of code:
:
:
$cusip =~ s/\-//g;
$cusip =~/.${8}$/$1/g;
:
:
Is there a shorter way to transform this.
- Amit
==============================================================================
If you are not an intended recipient of this e-mail, please notify
the sender, delete it and do not read, act upon, print, disclose,
copy, retain or redistribute it.
Click here for important additional terms relating to this e-mail.
<http://www.ml.com/email_terms/>
==============================================================================
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>