if you're trying to set just a environment variable for the perl script
then you can do (in your shell):

$ export CCASE_NO_FILE_HEADER=yes
$ perl /home/m.belgaonkar/merge_latest.pl

if you want to set the variable for another task (in your perl code):


#!/usr/bin/perl
use strict;
..your perl code...
qx(CCASE_NO_FILE_HEADER=yes perl /home/m.belgaonkar/merge_latest.pl);
..more perl code...

On 13:23:13 17/04/2008 <[EMAIL PROTECTED]> wrote:
> Thanks for your reply.
>
> I have run the command like this....
>
> -> qx(CCASE_NO_FILE_HEADER=yes perl /home/m.belgaonkar/merge_latest.pl
> )
> bash: syntax error near unexpected token `qx(CCASE_NO_FILE_HEADER=yes'
> [EMAIL PROTECTED] ():/view/m.belgaonkar_oms_test/vob/oms [320]
>
> Please help.
>
> Regards,
> Irfan
>
> Project Lead
> TSINDIA - Production Line
> Individual Software Solutions - UMO
> T-Systems India Private Limited, Pune
> Telephone: +91-20-30245000/25605000 (Extn: 5271)
> Mobile: +91 9822 854 227
> Fax: +91-020 25674090
> Internet: http://www.t-systems.com
>
>
> -----Original Message-----
> From: Martin Barth [mailto:[EMAIL PROTECTED]
> Sent: Thursday, April 17, 2008 4:42 PM
> To: beginners@perl.org
> Subject: RE: setting unix command through perl script
>
> hi,
>
> you could do something like that:
>
> qx(CCASE_NO_FILE_HEADER=yes /path/to/your/task);
>
> this would set the variable only for this task.
>
> HTH,
> Martin
>
> On 11:48:35 17/04/2008 <[EMAIL PROTECTED]> wrote:
> >  Thanks for your help.
> >
> >  Actually , I am automating one task in Perl in which this command
> >  is there. If I don't execute this command then entire task would
> >  fail. So it's very important that I should set this variable with
> >  proper value and then start the execution of the task.
> >
> >  Regards,
> >  Irfan
> >
> >
> >  -----Original Message-----
> >  From: Martin Barth [mailto:[EMAIL PROTECTED]
> >  Sent: Thursday, April 17, 2008 3:02 PM
> >  To: beginners@perl.org
> >  Subject: RE: setting unix command through perl script
> >
> >  Hi,
> >
> >  maybe yes. why do you need this variable to be set/changed? tell us
> >  some more about your objectives, please.
> >
> >  Regards Martin
> >
> >  On 11:25:01 17/04/2008 <[EMAIL PROTECTED]> wrote:
> > >   Hi,
> > >
> > >   OK. Thanks.
> > >
> > >   IS there any other mechanism to achieve this??
> > >
> > >   Regards,
> > >   Irfan
> > >
> > >   -----Original Message-----
> > >   From: Martin Barth [mailto:[EMAIL PROTECTED]
> > >   Sent: Thursday, April 17, 2008 1:01 PM
> > >   To: beginners@perl.org
> > >   Subject: RE: setting unix command through perl script
> > >
> > >   Hi
> > >
> > >   your "command" is executed. it changes the environment of the
> > >   shell you spawn with qx(); but after this statement your shell
> > >   dies and it seems that
> > >   nothing happend..
> > >
> > >   it is simply impossible to change the environment of a parent
> > >   when you're a
> > >   child.
> > >
> > >   maybe you can add this line to your shell configuration file.
> > >   (.bash_profile or .zshrc ...)
> > >
> > >   Regards Martin
> > >
> > >   On 9:05:15 17/04/2008 <[EMAIL PROTECTED]> wrote:
> > > >    I want to execute "export CCASE_NO_FILE_HEADER=yes" command
> > > >    in Perl script.
> > > >    If I run this command on bash prompt then it is executing
> > > >    properly but if I try to execute this command through perl
> > > >    script then it is not executing at all
> > > >
> > > >    How should I achieve this . is there any another way.
> > > >
> > > >    Please help.
> > > >
> > > >    Regards,
> > > >    Irfan
> > > >
> > > >    -----Original Message-----
> > > >    From: Kenneth Wolcott [mailto:[EMAIL PROTECTED]
> > > >    Sent: Thursday, April 17, 2008 12:05 AM
> > > >    To: beginners@perl.org
> > > >    Subject: Fwd: setting unix command through perl script
> > > >
> > > >    Oops -- did reply and instead of reply-all :-(
> > > >
> > > >    ---------- Forwarded message ----------
> > > >    From: Kenneth Wolcott <[EMAIL PROTECTED]>
> > > >    Date: Wed, Apr 16, 2008 at 11:33 AM
> > > >    Subject: Re: setting unix command through perl script
> > > >    To: [EMAIL PROTECTED]
> > > >
> > > >
> > > >    Agreed that the parent process in which perl was invoked will
> > > >    not be changed
> > > >    by the perl script.
> > > >
> > > >    What is the overall objective?
> > > >
> > > >    Try to do everything you need to do inside the perl script,
> > > >    or everything
> > > >    you need to do outside the perl script.
> > > >
> > > >    HTH,
> > > >    Ken Wolcott
> > > >
> > > >
> > > >    On Wed, Apr 16, 2008 at 5:31 AM, Martin Barth
> > > >    <[EMAIL PROTECTED]> wrote:
> > > >
> > > > >     i think this is not possible.
> > > > >
> > > > >     if you start a new process (shell) it gets the
> > > >    environment of its parent
> > > > >     process. but if you manipulate the environment in a child
> > > >    the parent will
> > > > >     not notice this..
> > > > >
> > > > >     for example
> > > > >
> > > > >     $ bash
> > > > >     $ export FOO=BAR
> > > > >     $ echo $FOO
> > > > >     BAR
> > > > >     $ exit
> > > > >     $ echo $FOO
> > > > >
> > > > >
> > > > >     Regards Martin
> > > > >
> > > > >
> > > > >     On 14:20:18 16/04/2008 <[EMAIL PROTECTED]> wrote:
> > > > > >     I tried the line : $ENV{CCASE_NO_FILE_HEADER} = 'yes';
> > > > > >
> > > > > >     But still the value is not getting set.
> > > > > >
> > > > > >     Please help.
> > > > > >
> > > > > >     Regards,
> > > > > >     Irfan
> > > > > >
> > > > > >     Project Lead
> > > > > >     TSINDIA - Production Line
> > > > > >     Individual Software Solutions - UMO
> > > > > >     T-Systems India Private Limited, Pune
> > > > > >     Telephone: +91-20-30245000/25605000 (Extn: 5271)
> > > > > >     Mobile: +91 9822 854 227
> > > > > >     Fax: +91-020 25674090
> > > > > >     Internet: http://www.t-systems.com
> > > > > >
> > > > > >
> > > > > >     -----Original Message-----
> > > > > >     From: Rodrick Brown [mailto:[EMAIL PROTECTED]
> > > > > >     Sent: Wednesday, April 16, 2008 5:04 PM
> > > > > >     To: Sayed, Irfan
> > > > > >     Cc: beginners@perl.org
> > > > > >     Subject: Re: setting unix command through perl script
> > > > > >
> > > > > >     On Wed, Apr 16, 2008 at 7:05 AM,  <[EMAIL PROTECTED]
> .co
> >  m>
> > > > > > >      wrote: Hi All,
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >       I need to execute the "export CCASE_NO_FILE_HEADER=y
> es"
> > > > > > >       command through Perl script.
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >       What I did is qx(export CCASE_NO_FILE_HEADER=yes);
> > > > > > >       but still the value for CCASE_NO_FILE_HEADER is not
> > > > > > >    getting set to "yes"
> > > > > > >
> > > > > > >
> > > > > > >       Regards,
> > > > > > >
> > > > > > >       Irfan
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > > >     With Perl you can get and set environment variables
> > > >    through using %ENV
> > > > > >     ie. $ENV{FOO} = 'bar'
> > > > > >
> > > > > >     --
> > > > > >     [ Rodrick R. Brown ]
> > > > > >     http://www.rodrickbrown.com
> > > > > >     http://www.linkedin.com/in/rodrickbrown
> > > > > >
> > > > > >     --
> > > > > >     To unsubscribe, e-mail: [EMAIL PROTECTED]
> > > > > >     For additional commands, e-mail: [EMAIL PROTECTED]
> > > > > >     http://learn.perl.org/
> > > > >
> > > > >
> > > > >     --
> > > > >     To unsubscribe, e-mail: [EMAIL PROTECTED]
> > > > >     For additional commands, e-mail: [EMAIL PROTECTED]
> > > > >     http://learn.perl.org/
> > > > >
> > > > >
> > > > >
> > > >
> > > >    --
> > > >    To unsubscribe, e-mail: [EMAIL PROTECTED]
> > > >    For additional commands, e-mail: [EMAIL PROTECTED]
> > > >    http://learn.perl.org/
> > >
> > >
> > >   --
> > >   To unsubscribe, e-mail: [EMAIL PROTECTED]
> > >   For additional commands, e-mail: [EMAIL PROTECTED]
> > >   http://learn.perl.org/
> > >
> > >
> > >
> > >   --
> > >   To unsubscribe, e-mail: [EMAIL PROTECTED]
> > >   For additional commands, e-mail: [EMAIL PROTECTED]
> > >   http://learn.perl.org/
> >
> >
> >  --
> >  To unsubscribe, e-mail: [EMAIL PROTECTED]
> >  For additional commands, e-mail: [EMAIL PROTECTED]
> >  http://learn.perl.org/
> >
> >
> >
> >  --
> >  To unsubscribe, e-mail: [EMAIL PROTECTED]
> >  For additional commands, e-mail: [EMAIL PROTECTED]
> >  http://learn.perl.org/
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> http://learn.perl.org/
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> http://learn.perl.org/


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to