Help for this page

Select Code to Download

Select or download this

sub to_bin {
  my $num = shift;
  my $ret = '';
...
  }
  return $ret;
}