Help for this page

Select Code to Download


  1. or download this
    $stream =~ s/0/0000 /g;
$stream =~ s/1/1111 /g;
  2. or download this
    $stream =~ s/(.)/$1$1$1$1 /g; # could be rewritten using /e and x 4
  3. or download this
    $stream =~ tr/1/F/;
print "0x$stream\n";
  4. or download this
    0x0000
0x000F
0x00F0
...
0xFF0F
0xFFF0
0xFFFF