Select Code to Download

#!/opt/perl5/bin/perl5.005 -w
use strict;
...
  { print if /error|warning/i }
  close RC;
}