savezelda/twilight/titleid.pl

3 lines
85 B
Perl
Raw Permalink Normal View History

2009-05-26 10:12:55 +02:00
#!/usr/bin/perl
print "00010000", map { sprintf "%02x", ord uc } split //, $ARGV[0];