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