Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
tag: GitLive-maint-…
Fetching contributors…

Cannot retrieve contributors at this time

18 lines (9 sloc) 0.179 kb
#!/usr/bin/perl
require 'cbreak.pl';
&cbreak;
$| = 1;
print "gimme a char: ";
$c = getc;
print "$c\n";
printf "you gave me `%s', which is 0x%02x\n", $c, ord($c);
&cooked;
Jump to Line
Something went wrong with that request. Please try again.