RE: Warning that I am receiving. but not making any sense

2008-11-26 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED] Sent: Tuesday, November 25, 2008 5:04 PM To: Perl Beginners Cc: Wagner, David --- Senior Programmer Analyst --- WGO Subject: Re: Warning that I am receiving. but not making any sense Wagner, David --- Senior Programmer

Warning that I am receiving. but not making any sense

2008-11-25 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I get the following printed out on my terminal: pl517c.pl: Gen Rpt/Email St: 08:38:48 Attempt to free unreferenced scalar: SV 0x2063c74, Perl interpreter: 0x22424c at C:\CurrWrka\00COMM~3\pl517c.pl line 1259. Attempt to free unreferenced scalar: SV 0x206984c, Perl interpreter: 0x22424c at

RE: Warning that I am receiving. but not making any sense

2008-11-25 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED] Sent: Tuesday, November 25, 2008 11:46 AM To: Perl Beginners Cc: Wagner, David --- Senior Programmer Analyst --- WGO Subject: Re: Warning that I am receiving. but not making any sense Wagner, David --- Senior Programmer

Attempting to use SFTP between Windows and Linux box

2008-11-21 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have a couple of processes that run one on a production box and another on a test box. The production box script checks that a particular file is never more than 40 minutes old while on the test box, this checks that the actual polling processes ( in this case three pollers ) also are

RE: Cron environment for execution of Perl script

2008-11-09 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas. Owens [mailto:[EMAIL PROTECTED] Sent: Saturday, November 08, 2008 10:14 AM To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: Perl Beginners Subject: Re: Cron environment for execution of Perl script On Thu, Nov 6, 2008 at 16:42, Wagner

RE: Cron environment for execution of Perl script

2008-11-09 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Telemachus [mailto:[EMAIL PROTECTED] Sent: Saturday, November 08, 2008 6:13 AM To: beginners@perl.org Subject: Re: Cron environment for execution of Perl script On Thu Nov 06 2008 @ 3:42, Wagner, David --- Senior Programmer Analyst --- WGO wrote

Cron environment for execution of Perl script

2008-11-08 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I need an environment variable from my .profile on Solaris and having troubles getting at it. I have a Perl script which executes fine outside of cron and now am trying to do via cron. I wanted to stay away from a shell script and was wondering what is the easiest way to get my .profile

Changing from FTP to Secure copy

2008-10-21 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I am in the middle of moving from Solaris to Linux environment. On the current Solaris box, I use Net::FTP for all the work that needs to be done. On Linux, the ftp is not available, due to security concerns. The Linux environment had Perl at 5.8.0 and so I got the okay to bring down AS

RE: store first key of a hash to scalar

2008-09-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Noah [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 10, 2008 13:10 To: Perl Beginners Subject: store first key of a hash to scalar Hi there, What is the easiest way to store the first key of a hash to a scalar variable? Perl handles

RE: store first key of a hash to scalar

2008-09-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Noah [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 10, 2008 13:23 To: John W. Krahn Cc: Perl Beginners Subject: Re: store first key of a hash to scalar okay that basically answers my question. I will have to figure out to define a key that is

RE: matching lines in array - other ways to code

2008-09-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Noah [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 10, 2008 16:28 To: Perl Beginners Subject: matching lines in array - other ways to code Hi there, could somebody please suggest some other ways to simplify the reading and perhaps make the

RE: comparing text files, in a way

2008-09-08 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: frazzmata [mailto:[EMAIL PROTECTED] Sent: Monday, September 08, 2008 10:13 To: beginners@perl.org Subject: comparing text files, in a way I am writing a program where I want to be able to locate information regarding a person in one file, if they appear

RE: matching ' in regx

2008-08-26 Thread Wagner, David --- Senior Programmer Analyst --- WGO
From: Dan Baker [mailto:[EMAIL PROTECTED] Sent: Tuesday, August 26, 2008 17:00 To: beginners@perl.org Subject: matching ' in regx I have a thing driving me NUTS trying to detect a ' in a variable with regex, and either strip it out or at least detect and error out. for instance, this just

Problems w/ MVS::JESFTP.pm

2008-07-30 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Running the following script: my $MyJES = MVS::JESFTP-open($MyHost, $MyLogonId, $MyPw) or die; printf open to MVS completed w/o error\n; if ( ! defined $MyJES-submit($MyJob) ) {; #$job is the absolute name of a valid jcl file printf Problem with submission of job\n$MyJob\n; die

RE: Reg. Directory listing program

2008-06-04 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Gunwant Singh [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 04, 2008 10:02 To: beginners@perl.org Subject: Reg. Directory listing program Hi, I am new to this mailing list and I am very new to PERL. So, please bear with me for my questions. I

RE: Reg. Directory listing program

2008-06-04 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Wagner, David --- Senior Programmer Analyst --- WGO [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 04, 2008 11:08 To: Gunwant Singh; beginners@perl.org Subject: RE: Reg. Directory listing program -Original Message- From: Gunwant Singh [mailto

RE: hash

2008-05-22 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Bobby [mailto:[EMAIL PROTECTED] Sent: Thursday, May 22, 2008 12:33 To: Rob Dixon; beginners@perl.org Cc: Bobby Subject: Re: hash Rob, Yes the pids are unique. I've tried the comparison below but didn't worked, so what do you think is wrong with

RE: How do I find the key of a specific hash element?

2008-05-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: jshock [mailto:[EMAIL PROTECTED] Sent: Monday, May 19, 2008 07:20 To: beginners@perl.org Subject: How do I find the key of a specific hash element? For example: my %weekdays = ( 0 = SUN, 1 = MON, 2 = TUE, 3 = WED, 4 =

RE: problem using backslash on brackets in regular expressions

2008-04-22 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Daniel McClory [mailto:[EMAIL PROTECTED] Sent: Tuesday, April 22, 2008 16:06 To: beginners@perl.org Subject: problem using backslash on brackets in regular expressions Hi, I have files which contain sentences, where some lines have extra information

RE: CSV duplicate

2008-04-16 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Manoj [mailto:[EMAIL PROTECTED] Sent: Wednesday, April 16, 2008 12:00 To: 'Perl Beginners' Subject: CSV duplicate Hello List, Scenario: CSV file Host=Nirus,TCPIP,inxcp011,connected,Serv=rxmcpp1 Host=Nirus,TCPIP,inxcp011,connected,

RE: Example of FTP w/o Input file? Is it possible to do or not?

2008-04-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas. Owens [mailto:[EMAIL PROTECTED] Sent: Wednesday, April 09, 2008 13:05 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: beginners@perl.org Subject: Re: Example of FTP w/o Input file? Is it possible to do or not? On Wed, Apr 9, 2008 at 3

Example of FTP w/o Input file? Is it possible to do or not?

2008-04-09 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have a hash which contains for each entry the email which I need to ftp to a particular location with a specified name. I could write out the file and then do the ftp. But since I have the necessary data in an audittrail report, I was wondering if I can ftp from a variable using ftp

RE: Example of FTP w/o Input file? Is it possible to do or not?

2008-04-09 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas. Owens [mailto:[EMAIL PROTECTED] Sent: Wednesday, April 09, 2008 12:33 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: beginners@perl.org Subject: Re: Example of FTP w/o Input file? Is it possible to do or not? On Wed, Apr 9, 2008 at 1

Looking for example of how to keep an FTP processing running if the Ip Address is down or unavailable

2008-03-24 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have a polling process that runs 24x7 ( internal site ) and for the most part has no problems except that they shutdown the the internal site every three or four weeks and my process then dies. I have a simple setup: $MyFtp = Net::FTP-new($GlblInfo{ipaddr}, Debug = 1);

RE: Looking for example of how to keep an FTP processing running if the Ip Address is down or unavailable

2008-03-24 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas. Owens [mailto:[EMAIL PROTECTED] Sent: Monday, March 24, 2008 11:42 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: Perl Beginners Subject: Re: Looking for example of how to keep an FTP processing running if the Ip Address is down

RE: lstat and its uses

2008-02-11 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas. Owens [mailto:[EMAIL PROTECTED] Sent: Monday, February 11, 2008 13:21 To: Michael Barnes Cc: beginners@perl.org Subject: Re: lstat and its uses On Feb 11, 2008 4:17 PM, Michael Barnes [EMAIL PROTECTED] wrote: I thought about using lstat to get the

RE: lstat and its uses

2008-02-11 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Kashif Salman [mailto:[EMAIL PROTECTED] Sent: Monday, February 11, 2008 15:24 To: David Moreno Cc: John W. Krahn; Perl Beginners Subject: Re: lstat and its uses I am not sure how to bring it up using the perldoc, I read it when I was going through the

RE: Module help

2007-12-20 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Andy Dixon [mailto:[EMAIL PROTECTED] Sent: Thursday, December 20, 2007 10:37 To: Perl beginners Subject: Module help Hello, I have written a small module with a function that returns some text. However, when I run it, from a test script, I get:

timeout in ftp

2007-12-11 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have the following code: $MyFTP-put($MyFtpFromFile , $MyFtpToFile ); if ( ! $MyFTP-ok() ) { . } On my audit log: Net::FTP=GLOB(0x19c30c0) 125-Waiting for recall of data set FTPTRGP.AMPD0407 Net::FTP=GLOB(0x19c30c0): Timeout at /d/src/pl545.pl

RE: timeout in ftp

2007-12-11 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Tuesday, December 11, 2007 15:07 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: beginners@perl.org Subject: Re: timeout in ftp On 12/11/07, Wagner, David --- Senior

RE: Writing DOS CRLF via Unix Perl

2007-11-08 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: C.R. [mailto:[EMAIL PROTECTED] Sent: Thursday, November 08, 2007 12:34 To: beginners@perl.org Subject: Writing DOS CRLF via Unix Perl I run a script on unix Perl to write a text file. By default, when Perl writes \n it writes a line ending sequence

RE: average and standard deviation

2007-10-03 Thread Wagner, David --- Senior Programmer Analyst --- WGO
If you have any problems or questions, please let me know. Thanks. Wags ;) David R Wagner Senior Programmer Analyst FedEx Freight 1.408.323.4225x2224 TEL 1.408.323.4449 FAX http://fedex.com/us -Original Message- From: Mahurshi Akilla [mailto:[EMAIL

RE: AFAIK

2007-09-24 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Somu [mailto:[EMAIL PROTECTED] Sent: Monday, September 24, 2007 09:42 To: Beginners@perl.org Subject: AFAIK What does it mean? AFAIK? I have seeing it a lot.. Earlier i've been seeing the HTH, and a guess gave the answer.. But this one, AFAIK... Are

RE: How to test for 0

2007-09-24 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Zachary Shay [mailto:[EMAIL PROTECTED] Sent: Monday, September 24, 2007 11:04 To: beginners@perl.org Subject: How to test for 0 Is there a way to test for values where zero is valid? For instance: %a_Hash; $a_hash{user_id} = 0; $a_hash{user_name} =

RE: System

2007-09-21 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Somu [mailto:[EMAIL PROTECTED] Sent: Friday, September 21, 2007 08:27 To: Beginners@perl.org Subject: System About that PID problem, i found a program in Windows named tasklist, it prints all the processes running on the system with its id. I used the

RE: Abnormal behavior of print / syswrite

2007-09-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Sundeep [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 19, 2007 05:50 To: beginners@perl.org Subject: Abnormal behavior of print / syswrite A clue less problem for me... my $message = Completed CODE standards checks.\n.

RE: Using Perl Win 32 AS 5.8.x - Anyway to find the File Create Date/Time

2007-09-18 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED] Sent: Monday, September 17, 2007 18:42 To: beginners@perl.org Subject: Re: Using Perl Win 32 AS 5.8.x - Anyway to find the File Create Date/Time Wagner, David --- Senior Programmer Analyst --- WGO wrote: stat

RE: how to make use of $content in LWP

2007-09-17 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas Owens [mailto:[EMAIL PROTECTED] Sent: Monday, September 17, 2007 10:14 To: W. Sp. Cc: beginners@perl.org Subject: Re: how to make use of $content in LWP On 9/16/07, W. Sp. [EMAIL PROTECTED] wrote: snip regex worked fine in my case. But my question

RE: Using Perl Win 32 AS 5.8.x - Anyway to find the File Create Date/Time

2007-09-17 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Jenda Krynicky [mailto:[EMAIL PROTECTED] Sent: Monday, September 17, 2007 15:42 To: beginners@perl.org Subject: Re: Using Perl Win 32 AS 5.8.x - Anyway to find the File Create Date/Time From: Wagner, David --- Senior Programmer Analyst --- WGO

RE: Format Output

2007-09-17 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: VUNETdotUS [mailto:[EMAIL PROTECTED] Sent: Monday, September 17, 2007 12:36 To: beginners@perl.org Subject: Format Output I print some output in PERL. It is data in 3 columns. I use \t to add a tab space to make a column. However, \t may not produce the

Using Perl Win 32 AS 5.8.x - Anyway to find the File Create Date/Time

2007-09-14 Thread Wagner, David --- Senior Programmer Analyst --- WGO
stat will give me the mod time, but does not have the create time. From Windows Explorer, I notice that I can get the Create Date. Anyway to accomplish this in Perl? I did a search against CPAN and also AS, but what I put in ( Perl create time file ) did not seem to give me what I

RE: a division warning

2007-08-27 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: lists user [mailto:[EMAIL PROTECTED] Sent: Sunday, August 26, 2007 20:01 To: beginners perl Subject: a division warning I run a perl command below, perl -Mstrict -Mwarnings -e 'eval {my $x=3;my $y=$x-3;$x/$y};print hello' Useless use of division (/)

RE: store more values in a hash array

2007-08-27 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: news [mailto:[EMAIL PROTECTED] On Behalf Of Andreas Moroder Sent: Sunday, August 26, 2007 23:37 To: beginners@perl.org Subject: store more values in a hash array Hello, I have to store more then one value in a hash array. I tried to store a array as

RE: File Creator under WIN32 environment

2007-08-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Rob Dixon [mailto:[EMAIL PROTECTED] Sent: Thursday, August 23, 2007 03:38 To: beginners@perl.org Cc: Wagner, David --- Senior Programmer Analyst --- WGO Subject: Re: File Creator under WIN32 environment David Wagner wrote: Need to get

Any way to know if a particular file is open and being used ( Windows )

2007-08-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Rob Dixon pointed me to a module(Win32::Security::NamedObject) which works, but when I tried a larger volume, it failed with the following: GetNamedSecurityInfo: The process cannot access the file because it is being used by another process. at

File Creator under WIN32 environment

2007-08-22 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Need to get the individual who created the file I am looking at. I am using File::Find to get all files that are 4 days or younger. I can get all info: Path, file name, file size, date modified easily except owner. I have looked at the Perl doc ( using AS 5.8.8 build 820 ). I see that I

Ability to do numeric and alpha sort in one pass on data which is compirsed of both

2007-08-14 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I am attempting to sort data which has a combination of both numeric and alpah numeric data. Now it would not be so bad, but the numeric data can be either 9 or 10 characters in length and no leading zero is supplied in the numbers. I have supplied some code I am playing with, but running into a

RE: calculating time difference with localtime

2007-08-08 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: timbo [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 08, 2007 07:03 To: beginners@perl.org Subject: calculating time difference with localtime Once I calculate the difference between 2 epoch times, is there a way I can convert the difference into a

RE: slices

2007-08-08 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: oryann9 [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 08, 2007 13:44 To: Perl List Subject: slices Trying to understand from perldoc perldata the diff between these 3 CLIs and why the 2nd CLI has no elements? $ perl -le 'use Data::Dumper; @c =

RE: How i convert a excel file to csv file ?

2007-08-07 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Use Spreadsheet::ParseExcel. I had a similar situation and by just using the examples within was able to write out three csv for some processing I am doing. If a single worksheet, then you coupld possbily get away with using ParseExcel::Simple to accomplish the work. If you have

RE: How do I truncate or remove a trailing character

2007-08-01 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Bret Goodfellow [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 01, 2007 14:25 To: beginners@perl.org Subject: How do I truncate or remove a trailing character Okay, I know this has to be simple, but because I am trying to truncate or remove a special

RE: Distill some string from whole string

2007-07-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: jeanwelly [mailto:[EMAIL PROTECTED] Sent: Thursday, July 19, 2007 05:26 To: beginners@perl.org Subject: Distill some string from whole string $my_string = a\nbbl.dghd\n/usr/command\n; I want to distill /usr/command and assign to a variable, how can

RE: Combining Records From Multiple Files based on Common Key Values

2007-07-18 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: country [mailto:[EMAIL PROTECTED] Sent: Wednesday, July 18, 2007 06:00 To: beginners@perl.org Cc: [EMAIL PROTECTED] Subject: Combining Records From Multiple Files based on Common Key Values I have multiple CSV files (3 for this example) with identical

RE: Spreadsheet::WriteExcel problem with large file

2007-07-16 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: a_arya2000 [mailto:[EMAIL PROTECTED] Sent: Monday, July 16, 2007 14:06 To: beginners@perl.org Cc: a_arya2000 Subject: Re: Spreadsheet::WriteExcel problem with large file By the way, my file size around 22 MB so, is it possible that

RE: Need idea for doing automatic iteration, please.

2007-06-28 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Patrik Hasibuan [mailto:[EMAIL PROTECTED] Sent: Thursday, June 28, 2007 12:55 To: Milis CPAN-Perl-Beginners Subject: Need idea for doing automatic iteration, please. Dear my friends... I want my code does an action if it find a directory or file,

FTP to IBM ZOS/390

2007-06-15 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Has anyone done any FTP'ing to IBM ZOS/390 machine. As you can see in the output there was a timeout due to waiting for a file to recalled from tape to disk. Output: Net::FTP=GLOB(0x15f35c) STOR FREQ0407 Net::FTP=GLOB(0x15f35c) 125-Waiting for recall of data set FTPTRGP.FREQ0407

RE: FTP to IBM ZOS/390

2007-06-15 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Chas Owens [mailto:[EMAIL PROTECTED] Sent: Friday, June 15, 2007 16:50 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: beginners@perl.org Subject: Re: FTP to IBM ZOS/390 On 6/15/07, Wagner, David --- Senior Programmer Analyst --- WGO [EMAIL

RE: Win32 script cannot read command line argument.

2007-05-02 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Vladimir Lemberg [mailto:[EMAIL PROTECTED] Sent: Wednesday, May 02, 2007 14:01 To: beginners@perl.org Subject: Win32 script cannot read command line argument. Hi All, My script is unable to read argument when I'm executing it as: script.pl argument.

RE: What's HTH?

2007-04-25 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Believe it is 'Hope this helps!'. If you have any problems or questions, please let me know. Thanks. Wags ;) David R Wagner Senior Programmer Analyst FedEx Freight 1.408.323.4225x2224 TEL 1.408.323.4449 FAX http://fedex.com/us -Original Message-

RE: substitute and assign in one line

2007-04-17 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Karyn Williams [mailto:[EMAIL PROTECTED] Sent: Tuesday, April 17, 2007 15:14 To: Perl Beginners Subject: substitute and assign in one line This is probably very simple, but I'm not seeing it. I want to do the following: my $lfirst = $first; $lfirst

RE: Exiting loops

2007-03-29 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Karyn Williams [mailto:[EMAIL PROTECTED] Sent: Wednesday, March 28, 2007 17:54 To: beginners@perl.org Subject: RE: Exiting loops At 04:10 PM 3/28/07 -0700, Wagner, David --- Senior Programmer Analyst --- WGO wrote: take the o off the /o

RE: Exiting loops

2007-03-28 Thread Wagner, David --- Senior Programmer Analyst --- WGO
take the o off the /o This is in essence saying you only have to compile this once for the processing going on. Take that off and see what happens. I believe you would use /o if you have regex has no variables which are changing with each iteration. If you have any problems or

RE: File::Find again

2007-03-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Matt Herzog [mailto:[EMAIL PROTECTED] Sent: Friday, March 23, 2007 15:00 To: Begin Perl Subject: File::Find again Hello All. I can see why people hate this module but I can't seem to let go. I point this script at a deep dir structure that has java

RE: capture stdin and stderr

2007-03-20 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Vladimir Lemberg [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 20, 2007 15:21 To: beginners@perl.org Subject: capture stdin and stderr Hi All, My script is calling a Win32 program with two arguments: system ( $ARGV[0]\\program.exe,

RE: How do I create this string?

2007-03-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Not tested: while ( 1 ) { printf Please enter length of variable(ex:exit out): ; chomp(my $MyInp = STDIN ); last if ( $MyInp =~ /^ex$/i ); if ( $MyInp !~ /\d+/ ) { print Expecting only digits, but got

RE: STDOUT

2007-03-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: hOURS [mailto:[EMAIL PROTECTED] Sent: Monday, March 19, 2007 13:17 To: Perl Beginners Subject: Re: STDOUT Jenda Krynicky [EMAIL PROTECTED] wrote: From: hOURS Hi, I wrote to the list with this issue before and got some suggestions, but

RE: polling a directory

2007-03-14 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Beginner [mailto:[EMAIL PROTECTED] Sent: Wednesday, March 14, 2007 10:56 To: beginners@perl.org Subject: polling a directory Hi, I am trying to find a means of monitoring a directory for activity. I would like a perl process to aware if a file has

RE: Removing blank lines

2007-03-12 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Beginner [mailto:[EMAIL PROTECTED] Sent: Monday, March 12, 2007 11:16 To: beginners@perl.org Subject: Re: Removing blank lines On 12 Mar 2007 at 11:09, Grant wrote: Hello, I'm having a lot of trouble figuring out how to remove blank lines from

RE: Where can I download the Perl Mail::Sendmail library module

2007-03-07 Thread Wagner, David --- Senior Programmer Analyst --- WGO
From: Michael Goopta [mailto:[EMAIL PROTECTED] Sent: Wednesday, March 07, 2007 12:13 To: beginners@perl.org Subject: Where can I download the Perl Mail::Sendmail library module Hi Chas, Thanks a lot for your help. It did get me started. It had time module. Now, when I started writing

RE: what does a lone percent sign mean?

2007-03-06 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Tony Heal [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 06, 2007 10:43 To: beginners@perl.org Subject: what does a lone percent sign mean? I am trying to determine how this does what it does. sub IsLeapYear { my $year = shift;

RE: Compound variable names

2007-03-02 Thread Wagner, David --- Senior Programmer Analyst --- WGO
From: Kevin Viel [mailto:[EMAIL PROTECTED] Sent: Friday, March 02, 2007 09:10 To: beginners@perl.org Subject: Compound variable names Greetings, I have been struggling with this one for a while. How can I create a variable name composed of two or more variables? I suspect I

RE: print if variable matches key

2007-02-28 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Brian Volk [mailto:[EMAIL PROTECTED] Sent: Wednesday, February 28, 2007 12:24 To: Brian Volk; beginners@perl.org Subject: RE: print if variable matches key -Original Message- From: Brian Volk [mailto:[EMAIL PROTECTED] Sent: Wednesday,

RE:

2007-02-26 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Matt Herzog [mailto:[EMAIL PROTECTED] Sent: Monday, February 26, 2007 12:28 To: Begin Perl Subject: $.: What does $.: mean? -- Ubuntu eh? I'm not really into Pokemon. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

Deleting hash keys, but ending up with other keys

2007-02-17 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have two hashes and each is made up of two keys. One has only a numeric value and the the second one has the detail. If I find out that I have right situation, I change the numeric value in the first hash. I have done data dumper where I create the hash and as I update the hash value and

RE: pattern match

2007-02-12 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Vladimir Lemberg [mailto:[EMAIL PROTECTED] Sent: Monday, February 12, 2007 12:33 To: beginners@perl.org Subject: pattern match Hi, I have a script, which suppose to find all *.xml files under the specified directory then process them. I'm facing the

RE: while loop problem

2007-01-31 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Brad Cahoon wrote: Hi Perl Masters I have a problem with a script which is suposed to open a huge text file and take 70 lines, create a file, then take the next 70 lines create a file and so on until it has parsed the whole file. My code just doesn't work and my brain cannot figure out

Trying to re-arrange output of email with a list of items

2007-01-25 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I currently have data for group1 which has x entries associated with it. As I currently put out the email, the data is going down the page. Well with the data being displayed, I thought why not have all on same line like following: EE Eenural 148ED Easuern 185NO

Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Here is a snippet of the code: my $MyFileHand; my $MyFileHand1; open($MyFileHand,$MyFileIn) || diet (3, $MyFileIn, $!); open($MyFileHand1,$MyFileIn1) || diet (3, $MyFileIn1, $!); proc_getrcd( $MyFileHand , $MyEOFProd,

RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Tuesday, January 23, 2007 11:51 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: Beginner Perl Subject: Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF On 1/23

RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
--- Senior Programmer Analyst --- WGO Cc: Beginner Perl Subject: Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF On 1/23/07, Wagner, David --- Senior Programmer Analyst --- WGO [EMAIL PROTECTED] wrote: I am just trying to read text files

RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
FAX http://fedex.com/us -Original Message- From: Wagner, David --- Senior Programmer Analyst --- WGO [mailto:[EMAIL PROTECTED] Sent: Tuesday, January 23, 2007 12:13 To: Tom Phoenix Cc: Beginner Perl Subject: RE: Trying to read two files using a sub to get the data, but 2nd read

RE: How to pull Text from a PDF using Perl?

2007-01-05 Thread Wagner, David --- Senior Programmer Analyst --- WGO
-Original Message- From: Dave Gray [mailto:[EMAIL PROTECTED] Sent: Thursday, January 04, 2007 17:01 To: beginners@perl.org Cc: Wagner, David --- Senior Programmer Analyst --- WGO Subject: Re: How to pull Text from a PDF using Perl? On 1/4/07, Wagner, David --- Senior Programmer Analyst

How to pull Text from a PDF using Perl?

2007-01-04 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I have tried both PDF::API2 and CAM::PDF and I must be misunderstanding how to use these modules. Here is the way I attempted using CAM::PDF Source portion: … use CAM::PDF; $MyPDF = CAM::PDF-new($MyFileIn); # a PDF file which has text $MyPDFPgCnt =

RE: line position

2006-11-03 Thread Wagner, David --- Senior Programmer Analyst --- WGO
If you provide some data and/or what you have attempted, it will go much farther in getting some assistance. Otherwise the list is guessing at what you are really trying to do. If you have any problems or questions, please let me know. Thanks. Wags ;) David R Wagner Senior

RE: line position

2006-11-03 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Programmer Analyst FedEx Freight 1.408.323.4225x2224 TEL 1.408.323.4449 FAX http://fedex.com/us -Original Message- From: Tim Wolak [mailto:[EMAIL PROTECTED] Sent: Friday, November 03, 2006 10:30 To: Wagner, David --- Senior Programmer Analyst --- WGO; beginners@perl.org Subject: RE

RE: line position

2006-11-03 Thread Wagner, David --- Senior Programmer Analyst --- WGO
1.408.323.4225x2224 TEL 1.408.323.4449 FAX http://fedex.com/us -Original Message- From: Tim Wolak [mailto:[EMAIL PROTECTED] Sent: Friday, November 03, 2006 11:05 To: Wagner, David --- Senior Programmer Analyst --- WGO; beginners@perl.org Subject: RE: line position The whole thing below

RE: line position

2006-11-03 Thread Wagner, David --- Senior Programmer Analyst --- WGO
: Friday, November 03, 2006 14:19 To: beginners@perl.org Subject: Re: line position Wagner, David --- Senior Programmer Analyst --- WGO am Freitag, 3. November 2006 22:16: If it is only one line and it is record separator is carriage return as defined by your system, then a simple loop like

Switching from FTP to SCP processing

2006-10-20 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I found out this week that within our organization, FTP will be no longer allowed and that in its place, scp ( secure copy over SSH ) will take it's place. I have a couple of polling modules which use FTP to look for trigger files in specific locations on remote machines. I then ftp the

RE: More Info About $| = 1;

2006-10-18 Thread Wagner, David --- Senior Programmer Analyst --- WGO
I copied and ran without the $|=1 and it displays the text What is your name? and I enter na d it completes. I tried both from the cmd.exe and a kornshell and both wroked the same way. Might it have something to do with Eclipse? If you have any problems or

RE: grouppin in the regular expressions

2006-10-13 Thread Wagner, David --- Senior Programmer Analyst --- WGO
use !~ vs =~ which is if not so if ( $line !~ /\(xxx\)/ ) { # does not contain (xxx) }else { # does contain } If you have any problems or questions, please let me know. Thanks. Wags ;) David R Wagner Senior

RE: Subroutine returning 2 arrays

2006-10-12 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Believe you want to do as a reference otherwise it justs returns the data as a flat file or stream of data. Here is a snippet. Would get away from a and b since the $a and $b are used by sort. Know that it is an array, but would get away from that. Also use strict and warnings. #!perl use

RE: dates

2006-10-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
The same you your doing $year, $mon, $mday use %02d which tells sprintf to add leading zeros as need to keep the size correct. So \_$hour\:$min\:$sec becomes \_%02d\:%02d\:%02d and you add the $hour, $min and $sec after the $mday. If you have any problems or questions, please

RE: Modules to extract calendar info from Exchange

2006-09-15 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Can't answer the first, but on the second: I send text messages to my ATT cingular phone using sendmail to send the text. This gives me heads up when I have problems. Now I am also starting sending to another phone number using cingular, but it is a blackberry. This user

RE: get only filenames and not directory names under a specific path.

2006-07-21 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Nishi Bhonsle wrote: I tried it but didnt work. my @new; find(sub {push @new, $_}, $path); find(sub {push(@new,$_) if ( !/^\.{1,2}/ ) }, $path); If not 1 or 2 periods push on to @new; Wags ;) open FILE,$logfile; print FILE $_\n foreach @new; close FILE; In

RE: get only filenames and not directory names under a specific path.

2006-07-21 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Wagner, David --- Senior Programmer Analyst --- WGO wrote: Nishi Bhonsle wrote: I tried it but didnt work. my @new; find(sub {push @new, $_}, $path); find(sub {push(@new,$_) if ( !/^\.{1,2}/ ) }, $path); If not 1 or 2 periods push on to @new; Wags ;) Sorry I missed

RE: array help

2006-07-20 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Sayed, Irfan (Irfan) wrote: Hi, I have written following line. but i am getting error my @test = (/test , /playground); print @test; i am getting output as follows /test/playground i need the output in following fasion /test /playground can you please tell me what is

RE: Rel help in array

2006-07-20 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Sayed, Irfan (Irfan) wrote: Hi, I have one array called as @array1 which has some data I have another @array2 which also has some data. now for each element / value of both these arrays i need to a run a specific command at a time , not one by one. means that for every element of both

RE: reg ex problem

2006-06-27 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Ryan Moszynski wrote: i have this string extracted from a text file i'm writing a program to process: test_freq = 1.0001; and i have to extract the 1.0001 i can't count on the whitspace being where it now is. I would like to change this line of perl $getTestFRQ =~ s/\D+//g;

RE: reading a line at a time inefficient?

2006-05-16 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Bryan Harris wrote: If I'm reading in many-megabyte files, is it considered to be more efficient to read it into an array, then loop over the array? Or is reading a line at a time okay? Depends really on the size and what you trying to do. Almost all that I do, I read a line at

RE: hash assign not working

2006-05-16 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Smith, Derek wrote: My hash creations are not working as I expected: %hash = ( @mir, @mir2 ); Why? To populate a hash requires two fields: Key and data. What you are assuming is that it will take one from @mir and one from @mir2 which is a wrong assumption. Yes the second works

  1   2   3   4   5   >