Perl/or script command to grab from 3 char of filename to the end of filename ?

[Sammy_2]

got a list of filenames below

#ls

testing

trying

wonder

caprel

 cp the file above with new names as following (grab 3 character to the end of file) with the new filename  below after executing the command

sting

ying

nder

prel

[Dennis Handly]

Besides sed, you can also use shell parameter substitution:

fname=testing

echo ${fname#??}