Also I think you need to put the call to phrase the system command like this:

system("rm $_");

But perl has unlink, which is cleaner and could give you style points (this coming
from someone who has little perl style, of course!).

So you could (should?) just say:

foreach (@Symlink) { unlink if -e;  } # Perlish !!

Matt 



--- Frank <[EMAIL PROTECTED]> wrote:
> On Wed, Feb 06, 2002 at 03:05:29PM +0100, Jorge wrote:
> >  I tried this:
> >   @Symlink=("$program_path\\install.lnk",
> >                      "$program_path\\linux.ram.lnk",
> >                      "$program_path\\alize\\install.lnk",
> >                      "$program_path\\alize\\startup.txt.lnk");
> > 
> >   foreach (@Symlink)
> >   {
> >             if (-e $_)
> >             {
> > 
> >                     system "rm $_";
> > 
> >             }
> >    }
> >    
> >   but it seems not to work?Why?
> 
> I _think_ the \\ want to be / since rm is a Unix command.
> 
> -- 
>  Frank Booth - Consultant
> Parasol Solutions Limited.
> (www.parasolsolutions.com)
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 


__________________________________________________
Do You Yahoo!?
Send FREE Valentine eCards with Yahoo! Greetings!
http://greetings.yahoo.com

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to