Re: Env variables readable by an application

2007-12-27 Thread Chas. Owens
On Dec 28, 2007 2:24 AM, Travis Thornhill <[EMAIL PROTECTED]> wrote: snip > Is there a way to do this? In other words, is there a way to > set env variables that ANY user and ANY application can see? snip No, environmental variables are a per-process thing. Child processes inherit the state o

Env variables readable by an application

2007-12-27 Thread Travis Thornhill
I have an application that executes a user-defined script. The application sets certain environment variables that the script uses to determine which phase it is in. I want to be able to set other env variables to set other conditions usable by the script. Is there a way to do this?

Re: Problem with adding a connection with Win32::NetResource

2007-12-27 Thread Chas. Owens
On Dec 27, 2007 3:15 PM, Nash <[EMAIL PROTECTED]> wrote: snip > The program actually works if I omit the 'LocalName' definition in > line 4, i.e. it makes the connection. However, since I don't have a > local name I can't subseqently cancel the connection, and I'd like to > be able to do that. > Wi

Re: [EMAIL PROTECTED]

2007-12-27 Thread Chas. Owens
On Dec 27, 2007 10:46 AM, Clifton Lee <[EMAIL PROTECTED]> wrote: > Hello, > > The output from the system command may be better stored in a scalar and then > split into an array (separated by return line characters). Then you can use > the 'foreach' operator for each element in your array. > > @arr

Problem with adding a connection with Win32::NetResource

2007-12-27 Thread Nash
Hi all, I'm new to Perl and I'm trying to use it to connect to a shared disc through a home network. This is what I've tried: #!/usr/bin/perl -w use Win32::NetResource; $RemoteShare

Re: replace chars

2007-12-27 Thread yitzle
On Dec 27, 2007 11:46 AM, Octavian Rasnita <[EMAIL PROTECTED]> wrote: > I am thinking to do something like: > ...because it requires less code. > More legible code is usually far more valuable than shorter code.

Re: FTP file handle question

2007-12-27 Thread John W. Krahn
Sturdevant, Robert W Mr CTR USA AMC wrote: Hi group, Hello, I'm troubleshooting a perl 5.6 Win32 app that uses Net::FTP. I am trying to ftp using a file handle instead of a local file name. POD says something like $ftp->put(LOCAL_FILE [REMOTE_FILE]) where LOCAL_FILE may be a file name or a f

FTP file handle question

2007-12-27 Thread Sturdevant, Robert W Mr CTR USA AMC
Hi group, I'm troubleshooting a perl 5.6 Win32 app that uses Net::FTP. I am trying to ftp using a file handle instead of a local file name. POD says something like $ftp->put(LOCAL_FILE [REMOTE_FILE]) where LOCAL_FILE may be a file name or a file handle. I know $filename does exist, I can see it!

Re: replace chars

2007-12-27 Thread Octavian Rasnita
From: "Gunnar Hjalmarsson" <[EMAIL PROTECTED]> This is the approach I had in mind: $ cat test.pl #!/usr/bin/perl use Encode; $octets = ; $chars = decode 'utf8', $octets; %special = ( "\xc3\x96" => 'O', "\xc3\xa5" => 'a' ); ($translated = $octets) =~ s/(\xc3\x96|\xc3\xa5)/$special{$1}/g; prin

Re: replace chars

2007-12-27 Thread Octavian Rasnita
From: "rahed" <[EMAIL PROTECTED]> [EMAIL PROTECTED] ("Octavian Rasnita") writes: I want to replace some special characters with their corresponding Western European chars, for example a with a, â with a, s with s, t with t, î with i and so on. The module Text::Unidecode does exactly what you

RE: [EMAIL PROTECTED]

2007-12-27 Thread Clifton Lee
Hello, The output from the system command may be better stored in a scalar and then split into an array (separated by return line characters). Then you can use the 'foreach' operator for each element in your array. @arr1 = qw/java oracle/; $scalar = `ps -eo pid,user,pcpu,pmem,args | grep -v grep

Re: [EMAIL PROTECTED]

2007-12-27 Thread John W. Krahn
Anirban Adhikary wrote: Hi all Hello, Subject: [EMAIL PROTECTED] Please put the subject of your email on the Subject line. I want to assign the each column of the following file in a separate variable. 2864 oracle0.0 0.2/home/oracle/u01/app/oracle/product/10.2.0/db_1/inventory/bin/tn

Re: replace chars

2007-12-27 Thread rahed
[EMAIL PROTECTED] ("Octavian Rasnita") writes: > I want to replace some special characters with their corresponding > Western European chars, for example a with a, â with a, s with s, t > with t, î with i and so on. The module Text::Unidecode does exactly what you look for. The conversion is not

[EMAIL PROTECTED]

2007-12-27 Thread Anirban Adhikary
Hi all I want to assign the each column of the following file in a separate variable. 2864 oracle0.0 0.2/home/oracle/u01/app/oracle/product/10.2.0/db_1/inventory/bin/tnslsnr LISTENER -inherit 2872 oracle0.0 0.6 ora_pmon_orcl 2874 oracle0.0 0.5 ora_psp0_orcl 2876 oracle0.0 1.

Re: replace chars

2007-12-27 Thread Octavian Rasnita
From: "Dr.Ruud" <[EMAIL PROTECTED]> "Octavian Rasnita" schreef: I have also seen that length($string) returns the number of bytes of $string, and not the number of chars (if the string contains UTF-8 chars). This tells me that you are taking input from an octet buffer that comes from outside.

Re: replace chars

2007-12-27 Thread Gunnar Hjalmarsson
Chas. Owens wrote: On Dec 26, 2007 2:59 PM, Gunnar Hjalmarsson <[EMAIL PROTECTED]> wrote: Well, then you'll probably need to identify the utf8 octet sequences that correspond to the special characters you want to see transformed. snip Perl strings are in UTF-8*, but if you want to specify a ch