Select Code to Download

use strict;
use warnings;
...
{
    print "****\n$1\n";
}

****
CALCON(test1)
...
  MAX(65535)
  UNITS(ms)
}