Skip to content

Instantly share code, notes, and snippets.

@roycewilliams roycewilliams/hexception

Last active Jun 19, 2020
What would you like to do?
#!/usr/bin/env perl
# Created: 2017-08-13
# Author: Royce Williams / tychotithonus
# License: public domain
while (<>) {
# Convert input to $HEX[] notation
my $hex = '$HEX[' . unpack("H*", $_) . ']' . "\n";
# Convert HEX notation to hex ... again (hexception!)
print unpack("H*", $hex) . "\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.