Help for this page

Select Code to Download


  1. or download this
    my $answer= grep /^1006,/, @array;
   my $thing = substr($answer, 6,6);