Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: Using File::Find to find drive (Win32)

by idsfa (Vicar)
on Oct 23, 2003 at 21:23 UTC ( #301728=note: print w/replies, xml ) Need Help??

in reply to Using File::Find to find drive (Win32)

If you're not married to File::Find...

use Config; print $Config{prefix},$/;

assuming that by 'Perl' you mean the directory where your perl was installed. If you mean the binary, use the perlpath key instead. pod

You cannot rely upon ^X, because you are assuming certain builds of perl when you do so. CygWin acts as Unix:

$ uname CYGWIN_NT-5.0 $ perl -e 'print $^X,$/;' perl $ /usr/bin/perl -e 'print $^X,$/;' /usr/bin/perl

(Thanks to tye and bart for clarifying which perls show this behaviour.)

Remember, when you stare long into the abyss, you could have been home eating ice cream.

Replies are listed 'Best First'.
Re: Re: Using File::Find to find drive (Win32)
by bart (Canon) on Oct 23, 2003 at 21:34 UTC
    That still sounds a bit too hard to me. Why not just examine $^X? This command line:
    perl -le "print $^X"
    which, for me, prints
    so it doesn't just copy the name you called perl with, off the command line.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://301728]
[Discipulus]: and they ask why we have so many traffic jams..

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (10)
As of 2018-04-26 07:53 GMT
Find Nodes?
    Voting Booth?