elsif (!(($ARGV[1]) && ((-f "$basepath$ARGV[0]/$ARGV[1].dat") 
    || (-f "$basepath$ARGV[0]/$ARGV[1].DAT")))) { 
&listtoday;