Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: 863a83c3cc
Fetching contributors…

Cannot retrieve contributors at this time

executable file 14 lines (11 sloc) 0.23 kB
#!/usr/bin/perl
use strict;
# calc
print "Expression?\n";
while (1) {
print '> ';
chomp(my $c = <STDIN>);
exit(0) if(($c =~ /^\s*:q\s*/));
my $i = eval($c);
printf("%d 0x%x 0%o %b %f %s \n", $i, $i, $i, $i, $i, $i);
}
Jump to Line
Something went wrong with that request. Please try again.