Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

schwartzian transform

by fionbarr (Friar)
on Oct 13, 2014 at 20:57 UTC ( [id://1103673] : perlquestion . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    29  '0,wupra00a0537'
    30  '31,wppra00a0513'
    ...
    33  '0,wupwa07a0663'
    34  '0,wdpwa00a0013'
    35
    
  2. or download this
    my @array = ();
             @array = map   { $_->[0] }
                    sort    { $b->[1] <=> $a->[1] }
                    map     { [ $_, /.+,/ ] } @cpu_lt_40
    
  3. or download this
    147  '0,wuprm00a0539'
    148  '0,wuprm00a0539'
    ...
    151  '0,wupra00a0532'
    152  '15,wppra01a0015'
    153  '22,wppra01a0095'