functions cvs{diff,update}{,i} fixed - "cat" filter -> really "pipebuf" filter
[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         }