# Open Log File for writting
open (LOGFILE, "> logfile.txt") or die ("Unable to open LogFile.\n");

sub dualprint
{
        print "@_";
        print LOGFILE "@_";
}

sub logprint
{
        print LOGFILE "@_";
}