Select Code to Download

my $BMinus = substr ($B, 0, (index ($B,&CheckFile(\$A,$B)) - 1));

...
    }
    return 1;
}