Help for this page

Select Code to Download


  1. or download this
    my @interesting = grep { (split /;/)[1] ne '   ' } <DATA>;
print @interesting;
...
TEC;URT;TDE;687
ERT;   ;ETR;567
TEC;UGC;TDE;687
  2. or download this
    TEC;UTF;TDE;450
TEC;URT;TDE;687
TEC;UGC;TDE;687