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]
> m>
> > > > > >     wrote: Hi All,
> > > > > >
> > > > > >
> > > > > >
> > > > > >      I need to execute the "export CCASE_NO_FILE_HEADER=yes"
> > > > > >      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/


Reply via email to