sub findJob
{ while($seemsLikeForever)
  { if($jobUses eq 'only MicroShaft products')
    { cry("like a baby!");
    }elsif($jobUses eq 'planning on Open Source some day, but currentl
+y MS')
    { cry("whine like spoiled child.");
    }elsif($jobUses eq 'Java on Windows')
    { cry("I can live with it");
    }elsif($jobUses eq 'Perl on Linux')
    { cry("hallelujah");
    }else
    { cry("they have lost their way")
    }
  }
  if($live eq "yes")
  { return(findJob("let's do it again")) #recursive call
  }else
  { return($dust)
  }
}
[download]