Moving files in Perl?

I have a .jpg file in a directory and I want to move it into a new directory that was just made inside the current directory. How would one go about doing this? I need to do this inside the actual program so clicking the image and dragging it to the other folder isn't what I'm looking for.
 
Back
Top