lass dir doch mal die fehlermeldung ausgeben. du lässt dir ja nur deine eigene meldung ausgeben.
doku von File::Copy:


in der variable $! steht die vom system zurückgelieferte fehlermeldung. also sowas wie file not found o.ä.

ob das chomp was ändert oder nicht, ist egal, es gehört in den code. das newline muss weg, es sei denn, die dateien haben wirklich ein newline am ende, was sehr unwahrscheinlich ist.

und mache bitte trotzdem die ausgabe von Data::Dumper, wenn das copy fehlschlägt.
wenn etwas nicht so funktioniert wie erwartet, hole dir so viele informationen wie möglich.