Help for this page

Select Code to Download


  1. or download this
    my $string = "TE=ASR,EV=R,PPF=G1,TG=G1,TMT=P1,RTV=YE,AAT=0,AT=105,ON=Y
    +,CF1=FGOC";
    
    ...
       if ($extras) { $extras--; $n++; }
       print(join(',', splice(@fields, 0, $n)), "\n");
    }
    
  2. or download this
    opt1=verylong
    opt2=longaswell
    opt3=1,opt4=1
    opt5=1,opt6=1
    
  3. or download this
    opt1=verylong,opt2=longaswell
    opt3=1,opt4=1
    opt5=1
    opt6=1