system "vent";
I'm obviously new to perl. I feel a bit like cackling right now because I was driving myself mad trying to do a simple file copy. After many hand to head movements, I realized that there was a newline returned from date (timestamp) that was screwing up the copy. Ouch. The perl gods are laughing and pointing at me, but still I walk on.
system "unvent";