Non-decimal radices/Convert: Difference between revisions

Content added Content deleted
Line 684: Line 684:
<lang perl>use POSIX;
<lang perl>use POSIX;


my ($num, $n_unparsed) = POSIX::strtol('1a', 16);
my ($num, $n_unparsed) = strtol('1a', 16);
$n_unparsed == 0 or die "invalid characters found";
$n_unparsed == 0 or die "invalid characters found";
print "$num\n"; # prints "26"</lang>
print "$num\n"; # prints "26"</lang>
Retrieved from "https://rosettacode.org/wiki/Non-decimal_radices/Convert"