smirn0v/nsdata-description-to-binary

## nsdata-description-to-binary
#!/usr/bin/env perl

use strict;
use warnings;
use autodie qw(:all);

my $str = do { local $/; <STDIN> };
$str =~ s/[^0-9a-fA-F]//gm;
$str = pack('H*', $str);

print $str;
	#!/usr/bin/env perl

	use strict;
	use warnings;
	use autodie qw(:all);

	my $str = do { local $/; <STDIN> };
	$str =~ s/[^0-9a-fA-F]//gm;
	$str = pack('H*', $str);

	print $str;