Select Code to Download

my$string = "4601 000000000002950 000000600537060DB000000000000000 000
+000600537060DB 460043750100000090002829599000282528900028252802535635
+62 V4120 20132352013235 1003NN 10 0";
   my $char = substr($string, 0, 2);
   print $char;