Include problem

This is a multi-part message in MIME format.

--===============0586366101==
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
boundary="----_=_NextPart_001_01C78B78.C7E05E68"

This is a multi-part message in MIME format.

------_=_NextPart_001_01C78B78.C7E05E68
Content-Type: text/plain;
charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable

Hello:
=20
I am attempting to access a module in another file and get an error
stating the module cannot be found.
=20
My main module is simply:
=20
require 'Telnet.pm';
use Net::Telnet ();
$t =3D new Net::Telnet (Timeout =3D> 10,
Prompt =3D> '/bash\$ $/');
=20
The first line was created with the 'Require Module' tab. The Telnet.pm
file is in the same directory as my main module but cannot be located.=20
What is the problem and how do I set an include path in ActivePerl ( if
that is the problem )?
=20
Thanks,
Brenda

------_=_NextPart_001_01C78B78.C7E05E68
Content-Type: text/html;
charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable



charset=3Dus-ascii">

Re: Include problem

--===============0323614418==
Content-Type: multipart/alternative; boundary=Apple-Mail-3--33830538


--Apple-Mail-3--33830538
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
charset=US-ASCII;
delsp=yes;
format=flowed

Hi Brenda,

Try:

use lib ".";
use Telnet

That should do the trick for you.

Cheers,

Preston.

On 01/05/2007, at 8:42 AM, Brenda Powers wrote:

> Hello:
>
> I am attempting to access a module in another file and get an error
> stating the module cannot be found.
>
> My main module is simply:
>
> require 'Telnet.pm';
> use Net::Telnet ();
> $t = new Net::Telnet (Timeout => 10,
> Prompt => '/bash\$ $/');
>
> The first line was created with the 'Require Module' tab. The
> Telnet.pm file is in the same directory as my main module but
> cannot be located.
> What is the problem and how do I set an include path in ActivePerl
> ( if that is the problem )?
>
> Thanks,
> Brenda
> _______________________________________________
> ActivePerl mailing list
> ActivePerl@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

--
Preston de Guise
pdeguise@gmail.com

http://www.anywebdb.com




--Apple-Mail-3--33830538
Content-Transfer-Encoding: quoted-printable
Content-Type: text/html;
charset=ISO-8859-1

-khtml-line-break: after-white-space; ">Hi Brenda,

RE: Include problem

From: activeperl-bounces@listserv.ActiveState.com
[mailto:activeperl-bounces@listserv.ActiveState.com] On Behalf Of
Preston de Guise
Sent: 01 May 2007 04:16
> To: Brenda Powers
> Cc: activeperl@listserv.ActiveState.com
> Subject: Re: Include problem
> =

> On 01/05/2007, at 8:42 AM, Brenda Powers wrote:
> =

> =

> Hello:
> =

> I am attempting to access a module in another file and get an
error stating the module cannot be found.
> =

> My main module is simply:
> =

> require 'Telnet.pm';
> use Net::Telnet ();
> $t =3D new Net::Telnet (Timeout =3D> 10,
> Prompt =3D> '/bash\$ $/');
> =

> The first line was created with the 'Require Module' tab. The
Telnet.pm file is in the same directory as my > main module but cannot
be located. =

> What is the problem and how do I set an include path in
ActivePerl ( if that is the problem )?
> =

> Hi Brenda, =

> =

> Try:
> =

> use lib ".";
> use Telnet
> =

> That should do the trick for you.

Unlikely for two reasons. First, the default Activestate installation
already has "." in the include path (@INC - a quick check with 'perl -V'
will confirm that in case I am wrong). Second, the current directory is
probably not the same as the directory that the script and module live
in.

The special variable $0 contains the name of the script being executed
(see 'perldoc perlvar'), which may contain path information, but a more
reliable to locate the directory you want way is to use FindBin (see
'perldoc FindBin'), for example.

use FindBin qw($Bin);
use lib $Bin;
require Telnet;

Note that the module name is not quoted and has no '.pm' extension. See
'perldoc -f require' for an explanation.

HTH

-- =

Brian Raven =


==================== =====3D=
================
Atos Euronext Market Solutions Disclaimer
==================== =====3D=
================

The information contained in this e-mail is confidential and solely for the=
intended addressee(s). Unauthorised reproduction, disclosure, modification=
, and/or distribution of this email may be unlawful.
If you have received this email in error, please notify the sender immediat=
ely and delete it from your system. The views expressed in this message do =
not necessarily reflect those of Atos Euronext Market Solutions.

Atos Euronext Market Solutions Limited - Registered in England & Wales with=
registration no. 3962327. Registered office address at 25 Bank Street Lon=
don E14 5NQ United Kingdom. =

Atos Euronext Market Solutions SAS - Registered in France with registration=
no. 425 100 294. Registered office address at 6/8 Boulevard Haussmann 750=
09 Paris France.

L'information contenue dans cet e-mail est confidentielle et uniquement des=
tinee a la (aux) personnes a laquelle (auxquelle(s)) elle est adressee. Tou=
te copie, publication ou diffusion de cet email est interdite. Si cet e-mai=
l vous parvient par erreur, nous vous prions de bien vouloir prevenir l'exp=
editeur immediatement et d'effacer le e-mail et annexes jointes de votre sy=
steme. Le contenu de ce message electronique ne represente pas necessaireme=
nt la position ou le point de vue d'Atos Euronext Market Solutions.
Atos Euronext Market Solutions Limited Soci=E9t=E9 de droit anglais, enregi=
str=E9e au Royaume Uni sous le num=E9ro 3962327, dont le si=E8ge social se =
situe 25 Bank Street E14 5NQ Londres Royaume Uni.

Atos Euronext Market Solutions SAS, soci=E9t=E9 par actions simplifi=E9e, e=
nregistr=E9 au registre dui commerce et des soci=E9t=E9s sous le num=E9ro 4=
25 100 294 RCS Paris et dont le si=E8ge social se situe 6/8 Boulevard Hauss=
mann 75009 Paris France.
==================== =====3D=
================

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Include problem

--===============0219652645==
Content-Type: multipart/alternative; boundary=Apple-Mail-7--14148456


--Apple-Mail-7--14148456
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
charset=US-ASCII;
delsp=yes;
format=flowed


On 01/05/2007, at 6:33 PM, Brian Raven wrote:

>>
>> Hello:
>>
>> I am attempting to access a module in another file and get an
> error stating the module cannot be found.
>>
>> My main module is simply:
>>
>> require 'Telnet.pm';
>> use Net::Telnet ();
>> $t = new Net::Telnet (Timeout => 10,
>> Prompt => '/bash\$ $/');
>>
>> The first line was created with the 'Require Module' tab. The
> Telnet.pm file is in the same directory as my > main module but cannot
> be located.
>> What is the problem and how do I set an include path in
> ActivePerl ( if that is the problem )?
>>
>> Hi Brenda,
>>
>> Try:
>>
>> use lib ".";
>> use Telnet
>>
>> That should do the trick for you.
>
> Unlikely for two reasons. First, the default Activestate installation
> already has "." in the include path (@INC - a quick check with
> 'perl -V'
> will confirm that in case I am wrong). Second, the current
> directory is
> probably not the same as the directory that the script and module live
> in.

Well, I guess that all my current scripts that do this when I'm
developing must be malfunctioning :-) I do however tend to only
execute during development from the directory it comes from though,
so yes, if you execute from another directory, that's not going to
work; I hadn't factored that in. But using PDK I tend to end up
compiling everything and treating it as a binary...

> The special variable $0 contains the name of the script being executed
> (see 'perldoc perlvar'), which may contain path information, but a
> more
> reliable to locate the directory you want way is to use FindBin (see
> 'perldoc FindBin'), for example.
>
> use FindBin qw($Bin);
> use lib $Bin;
> require Telnet;
>
> Note that the module name is not quoted and has no '.pm' extension.
> See
> 'perldoc -f require' for an explanation.

Alternatively, another technique would be to setup your own modules
directory so that you can reliably reference this at all times.

E.g.:

# mkdir /opt/MyPerl/modules
# mkdir /opt/MyPerl/modules/MyPerl

copy Telnet.pm to /opt/MyPerl/modules/MyPerl

then:

use lib "/opt/MyPerl/modules";
use MyPerl::Telnet


(Or some other apropos derivation).

Cheers,

Preston.

--
Preston de Guise
pdeguise@gmail.com

http://www.anywebdb.com




--Apple-Mail-7--14148456
Content-Transfer-Encoding: quoted-printable
Content-Type: text/html;
charset=ISO-8859-1

-khtml-line-break: after-white-space; ">