mirror of
https://github.com/lewurm/savezelda.git
synced 2024-05-28 23:38:48 +02: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];
|