Select Code to Download

($BKSIC_MODEL[$i] = substr ($line, 3, 7)) =~ m/^\s*(.*)\s*$/;

($BKSIC_MODEL[$i]) = substr ($line, 3, 7) =~ m/^\s*(.*)\s*$/;