my $New = "F:\\temp\\Test\\Test14.jpg"; my $Old = $New; copy("$Old", "$New");