Select Code to Download

#!/usr/bin/perl
use warnings;
...
print Dumper B => $a0 - $b1;
print Dumper C => $b0 - $b1;
print Dumper D => $b0 - $a1;