Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^2: system(cp filenamewithspaces newplace/newname)

by afoken (Chancellor)
on May 13, 2009 at 10:34 UTC ( [id://763715]=note: print w/replies, xml ) Need Help??


in reply to Re: system(cp filenamewithspaces newplace/newname)
in thread system(cp filenamewithspaces newplace/newname)

Double quotes on a bourne shell are subject to shell interpolation. Strange filenames will bite you:

#!/usr/bin/perl -w use strict; die "DON'T RUN THIS SCRIPT"; # just in case ... my ($from,$to)=('mostly-harmless.txt','$(rm -rf /)'); system(qq[cp "$from" "$to"]);

The shell invoked (typically /bin/sh) will see the following command line:

cp "mostly-harmless.txt" "$(rm -rf /)"

Before executing cp, the shell must first evaluate "rm -rf /", as its stdout should be passed as second argument to cp.

The best way to use system is not to mess with the shell at all, i.e. to use the system LIST variant or a perl build-in. In this case, CPAN has File::Copy which handles file copying inside perl, automatically using the most efficient implementation available (system API if present, fall back to open-read-write-close), and without any quoting problems or slow sub-process invokations.

Alexander

--
Today I will gladly share my knowledge and experience, for there are no sweeter words than "I told you so". ;-)

Replies are listed 'Best First'.
Re^3: system(cp filenamewithspaces newplace/newname)
by John M. Dlugosz (Monsignor) on May 13, 2009 at 15:10 UTC
    Abigail-II has a video (presentation from a conference) where he promotes using cp not File::Copy. Personally, I think a better solution is to fix the nuances in File::Copy that he identified.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://763715]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others goofing around in the Monastery: (4)
As of 2024-04-25 12:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found