Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
     }      

    print @linearr;

Select or download this

__DATA__
[2012/02/16 00:08:34] [29] ERRORMSG unknown error Can't insert into pr
+ice table Please check Valueprice.pm line 52.
[2012/02/16 00:08:34] [39] ERRORMSG Invalid User
[2012/02/16 00:14:52] [105] ERRORMSG missing conversion rate
[2012/02/16 00:14:52] [29] ERRORMSG Can't use an undefined value as a 
+HASH reference at Value.pm line 77.