Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 63 lines (37 sloc) 0.877 kb
#!/usr/bin/perl
use vars qw($VERSION);
my $APP = '';
$VERSION = '0.001';
use strict;
use Data::Dumper;
{
package Data::Dumper;
no strict 'vars';
$Terse = $Indent = $Useqq = $Deparse = $Sortkeys = 1;
$Quotekeys = 0;
}
use encoding 'utf8';
use charnames qw(:full);
for my $ord ( 0 .. 0x10ffff ) {
next unless chr($ord) =~ /\d/;
printf("%s %s %s\n", $ord, chr($ord), charnames::viacode($ord));
}
=pod
=head1 NAME
=head1 SYNOPSIS
=head1 DESCRIPTION
=head1 OPTIONS
=head1 AUTHOR
Magnus Woldrich
CPAN ID: WOLDRICH
magnus@trapd00r.se
http://japh.se
=head1 REPORTING BUGS
Report bugs on rt.cpan.org or to magnus@trapd00r.se
=head1 COPYRIGHT
Copyright (C) 2011 Magnus Woldrich. All right reserved.
This program is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
=cut
1;
# vim: set ts=2 et sw=2:
Jump to Line
Something went wrong with that request. Please try again.