"rpmx"+"unzipx" replaced by the general "exx" (.rpm/.zip += .a/.deb)
[nethome.git] / bin / fromhex
1 #! /usr/bin/perl
2
3 use strict;
4 use warnings;
5
6 while (<>) {
7         printf("%c",hex($1)) while ($_=~s/([[:xdigit:]]{2})//);
8         }