Select Code to Download

#!/usr/bin/perl

...
my $crc2 = $ctx->hexdigest;

print qq(       crc = $crc2\n);

#!/usr/bin/perl 
...
    }
    return ( $crc );
}