Select Code to Download

use MIME::Base64 qw/decode_base64/;
while ( my $filename = shift ) {
...
    my $der = decode_base64($1);
    decodeCert( $der );
}