for (`cal`) { /^(\d+)/ && $x=$1; } print "Latest Sunday is $x!\n";