in reply to How to use options in Perl shell?

A backslash inside a double-quoted string is an escape character. Try using single quotes or doubling up the backslashes (an escaped backslash is interpreted as a backslash).

my $src = "D:\\scripts";
my $dest = 'D:\labserver3';

[download]
---
print map { my ($m)=1<<hex($_)&11?' ':'';
$m.=substr('AHJPacehklnorstu',hex($_),1) }
split //,'2fde0abe76c36c914586c';

[download]

Replies are listed 'Best First'.
Re: Re: How to use options in Perl shell?
by andyram27 (Initiate) on Mar 04, 2003 at 21:31 UTC
    yea i have correct syntax in my script, i just forgot double-backslash when posting this message. I still don't know how to pass options to the command though.
    how would I execute the following dos command in perl? 
    xcopy /S d:\somedir r:\somedir

    [download]
    this should be analagous to executing this (on unix): 
    cp -s /somedir /somedir

    [download]
    Here is a link to my reference point, however the following code does NOT work (and my relative path is correct -- current dir for $src). 
    #!D:\Perl\bin\perl.exe -w

use Shell;
$src = "giveto\\kerri";
$dest = "D:\\1234567";
$ops = "\/S";
xcopy($ops,$src,$dest);

    [download]
[reply]
[d/l]
[select]

      The version of Shell I just downloaded (v0.4) requires you to import the commands you want to use on the use line which you don't show in your example.

      use Shell qw[xcopy dir];

      Other than that, the other problem I encountered was that if the command prompts for any reason, then then the script just sits there waiting for input--could that be your problem?

      Many of the commands have a "shut up and do it" switch (/I will stop XCOPY prompting "Is the destination a file or directory" etc.) 

      print xcopy '/S', 'c:\test\junk*', 't:';

      [download]
      Examine what is said, not who speaks.
      1) When a distinguished but elderly scientist states that something is possible, he is almost certainly right. When he states that something is impossible, he is very probably wrong.
      2) The only way of discovering the limits of the possible is to venture a little way past them into the impossible
      3) Any sufficiently advanced technology is indistinguishable from magic.
      Arthur C. Clarke.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom