Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: RE: Schwartzian Transform

by Vynce (Friar)
on May 23, 2001 at 01:05 UTC ( #82398=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my @sorted = 
               map{ $_->[0] }
               sort {$a->[1] cmp $b->[1]}
               map { m/(.*?)\s*(\S+)$/; [$_, "$2 $1" ] }
               @unsorted;
    
  2. or download this
    my @output =
      map { $_->[1] }
      sort { $a->[0] cmp $b->[1] }
      map { [$_, expensive_func($_)] }
      @input;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://82398]
help
Chatterbox?
[finddata]: How do i perform multiple line substitution into single line for same variable using perl

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (5)
As of 2017-02-24 05:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?






    Results (352 votes). Check out past polls.