#!/usr/bin/perl -w


use strict;

my $hexvalue = $ARGV[0];
print unpack "L<", pack "H*", $hexvalue;