Help for this page

Select Code to Download


  1. or download this
    use Modern::Perl;

while (<DATA>) {
...

__DATA__
06.02.2013 12.24.01:909 5807225321 INFO {EXT:httpadapter:17:14:}[0]RUL
+EZ [HTTPADAPTER],msisdn:637584930382,ud:Pan,trxtime:20130206122401 Re
+sponseDeltaTime:31 ms ResponseCode:200 ResponseBody:OK
  2. or download this
    06.02.2013,637584930382,Pan,20130206,200