C:\test>copy con junk 74/05/25 54/03/04 69/08/23 55/08/24 ^Z 1 file(s) copied. C:\test>perl -pes=(..)/(.*)=$2/$1=