#!/usr/bin/perl -w print 0xFG, "\n";