#!/usr/local/bin/perl # require("cgi-lib.pl"); &ReadParse; $hex = $in{'hex'}; $url = $in{'url'}; $smi = pack "H*", "$hex"; print &HtmlTop; print &PrintHeader; print "