mirror of
git://xwords.git.sourceforge.net/gitroot/xwords/xwords
synced 2024-12-28 09:58:30 +01:00
11 lines
230 B
Perl
11 lines
230 B
Perl
|
#!/usr/bin/perl
|
||
|
|
|
||
|
|
# Print all ascii characters (for pasting into Makefiles etc. when you
|
||
|
|
# don't know what key combination produces them)
|
||
|
|
|
||
|
|
use strict;
|
||
|
|
|
||
|
|
for ( my $i = int(' '); $i <= 255; ++$i ) {
|
||
|
|
printf "%.3d: %c\n", $i, $i;
|
||
|
|
}
|