in reply to Simple Perl file rename

It would help to know the OS here, but the REGEX can be as simple as:
$filename =~ s/.* ([^ ]*)$/$1/