my $mailprog;
if (lc($^O) eq "mswin32")
    #here is winland. 
    {$mailprog = 'C:\sendmail\sendmail.exe'} 
    # or whatever. I don't use sendmail on windows.
else
    #here is *nixland
    {$mailprog = "/usr/lib/sendmail"}