#! /usr/local/bin/perl

use strict;

if ("38" == 38){
    print "hit the jackpot!\n";
}
else {
    print "hit elsewhere....\n";
}

;1