#!/usr/bin/perl
use Merger::Success qw(Fiorina Capellas);
require employment;
print "Who's your daddy?";
my $employer = <STDIN>;
if ( $employer =~ /compaq/i ) {
my $life = "ok";
sleep(8/24);
} else {
my ($life, $family_time) = 0;
my $work_load++ and my $SLA = 24*7;
sleep(0);
our $layoffs > 10000;
open(WINDOW,"and.jump") unless my $job = new employment;
}