mirror of
https://github.com/lewurm/savezelda.git
synced 2024-06-28 06:16:08 +02:00
3 lines
85 B
Perl
3 lines
85 B
Perl
|
#!/usr/bin/perl
|
||
|
|
print "00010000", map { sprintf "%02x", ord uc } split //, $ARGV[0];
|