Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^3: Convert Shell script to Perl

by akrrs7 (Acolyte)
on Oct 10, 2011 at 15:26 UTC ( [id://930666]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Convert Shell script to Perl
in thread Convert Shell script to Perl

This is the code: 
use strict;
use warnings;
$ENV {'LIBDIR'}='$MY_XALANHOME/bin';
$ENV {'LOCALCLASSPATH'}='$ENV{LIBDIR}:/xalan.jar';
$ENV {'LOCALCLASSPATH'}='$ENV{LOCALCLASSPATH}:$ENV{LIBDIR}/xml-apis.ja
+r';
$ENV {'LOCALCLASSPATH'}='$ENV{LOCALCLASSPATH}:$ENV{LIBDIR}/xercesImpl.
+jar';

[download]
When I run the perl program from the command line using - perl abc.pl - I don't get any error messages. When I run the following command from the commandline: 
perl $ENV{'LIBDIR'}='C:\SOMEFOLDER';

[download]
I get a message saying - can't open perl script "$ENV": no such file or directory. I would've expected to create a new environment variable called LIBDIR with the c:\somefolder as the value ? Thanks

Replies are listed 'Best First'.
Re^4: Convert Shell script to Perl
by Utilitarian (Vicar) on Oct 10, 2011 at 15:43 UTC
    Two things, you need to tell the Perl interpreter to execute the code rather than look for a file of that name and the environment variables will not be set int the parent process (your shell) only in the Perl process and its children.

    So while perl -e "$ENV{LIBDIR'}='C:\SOMEFOLDER';" would create the varable, it would cease to exist when Perl exited.

    print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://930666]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2024-04-19 16:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found