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