Select Code to Download

my ($data_in, $data_out);

...
  ; #further processing here 
  print $data_out;
}

Use of uninitialized value $3 in concatenation (.) or string at perlmo
+nks_700143.pl line 8.