Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Remove digits from a string and add timestamp to the result

by sen (Hermit)
on Jan 02, 2013 at 11:43 UTC ( #1011251=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $a=Customer100;
    $b=20130201;
    $a=~ /(.*?)(\d+)/;
    $a= $1."_".$b."_".$2;
    print $a;
    
  2. or download this
    $a=~ s/(.*?)(\d+)/$1\_$b\_$2/;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1011251]
help
Chatterbox?
[Corion]: Whoa! Somebody forwarded the AnyEvent::Impl:: Prima loop to schmorp and he's even interested in maintaining it himself - that'd be highly convenient for me ;)
[Corion]: (I also have a mail by dk who suggests some additions, which I should add this evening)

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (10)
As of 2016-12-09 14:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (151 votes). Check out past polls.