mirror of
https://github.com/lewurm/savezelda.git
synced 2024-09-28 18:08:35 +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];
|