Help for this page
sub dec2bin { my $str = unpack('B32', pack('N', shift)); $str =~ s/^0+(?=\d)//; return $str; }
#!/usr/bin/perl -l ... $str =~ s/^0+(?=\d)//; return $str; }
www.com | www.net | www.org
No recent polls found
