#!/usr/bin/perl -w

use CGI;
use CGI::Carp 'fatalsToBrowser'; 

CGI::ReadParse(*in);

print "Content-type: image/gif\n\n";
print Images($in{img});
exit;

sub Images {

    my $image = $_[0];
    my %IMG;

    $IMG{dir} =
        '47494638396114001600c20000ffffff'.
        'ffcc99ccffff99663333333300000000'.
        '000000000021fe4e5468697320617274'.
        '20697320696e20746865207075626c69'.
        '6320646f6d61696e2e204b6576696e20'.
        '4875676865732c206b6576696e684065'.
        '69742e636f6d2c2053657074656d6265'.
        '7220313939350021f90401000002002c'.
        '000000001400160000035428badcfe30'.
        'ca4959b9f8ce12baef45c47d64a629c5'.
        '407a6a8906432cc72b1c8ef51a13579e'.
        '0f3c9c8f05ec0d4945e171673cb2824e'.
        '2234da495261569856c5ddc27882d46c'.
        '3c2680c3e6b47acd232c4cf08c3b0100'.
        '3b';
    
    $IMG{bomb} =
        '47494638396114001600e30000ffffff'.
        'ffcc33ccffffccccccbbbbbb99999988'.
        '88886666665555553333330000000000'.
        '0000000000000000000000000021fe4e'.
        '546869732061727420697320696e2074'.
        '6865207075626c696320646f6d61696e'.
        '2e204b6576696e204875676865732c20'.
        '6b6576696e68406569742e636f6d2c20'.
        '53657074656d62657220313939350021'.
        'f90401000002002c0000000014001600'.
        '00048f30c949a7b85824c0bbdf49766d'.
        '5e4986d916000ab07624808eddfb7dd8'.
        'a60449d0768a447048e3040a258572a9'.
        'a0ad14055ba7402d34351fe16f4abdc6'.
        '0008a85631987a3d6204f540e6588b1c'.
        'a51a603884cb6f2cba40a0db8500795f'.
        '2c557f808249078a08124a8167688b8d'.
        '8e881e03418d42789096434a658f709d'.
        '9f66a225a7820955abac5442194cb1b2'.
        '5711003b';
    
    $IMG{back} =
        '47494638396114001600c20000ffffff'.
        'ccffff99999966666633333300000000'.
        '000000000021fe4e5468697320617274'.
        '20697320696e20746865207075626c69'.
        '6320646f6d61696e2e204b6576696e20'.
        '4875676865732c206b6576696e684065'.
        '69742e636f6d2c2053657074656d6265'.
        '7220313939350021f90401000001002c'.
        '000000001400160000034b18badcfe23'.
        '10f26a103353bba2cedcf5699c374e16'.
        '768290740605372a451c6e586d2ffb92'.
        'eb354650f103ea78c6a491a66c16284e'.
        'a720da8cc0a83a824018d55692ded055'.
        'fce891cf8b04003b';

    return($IMG{$image});
}