Help for this page

Select Code to Download

Select or download this

0001111000001111000001111000001111000001111000001111000001111000001111
+000000000000000000000000000000000000000000000000000000000000000000000
+000000000000000000000000001111000001111000001111000001111000001111000
+00111100000111100000111100000111100000111100

Select or download this

sub bin2hex {
    my $line = $_[0];
...
    print "In bin2hex: $line\nAfter bin2hex: $hexLine\n\n";
    return $hexLine;
}