Re: Cronjob and System command in Perl Script

2009-10-20 Thread Todd Beverly
Hello. Perl Perl wrote: I have a cronjob and it is working fine, but problem is, *system* command in perl script is not working as per requirement. Please find the snipped, of code as below for your kind reference. script.pl if($Difference 15 ) { send_mail($Xid_Value, $View_Name,

Re: Save As option in Win32::OLE

2009-06-17 Thread Todd Beverly
Hi. Ramkumar wrote: I am opening word document through Win32::OLE and saving as Plain Text with Encoding option MS-DOS and Insert-Line-Break option. I achieved the above output through perl, but output not matching with the output which is done the same manual operation in MS-word.

Re: use system() function

2009-05-13 Thread Todd Beverly
Hi. Chang Min Jeon wrote: I trying to modify file using perl one line like below. my $cmd = perl -pi -e's/aaa/bbb/' ; I think that there should be a space between the -e and the regular expression my $cmd = perl -pi -e 's/aaa/bbb/' ; If you're in the Windows world, you might also want to

Re: Perl and XLS operation

2008-11-24 Thread Todd Beverly
Hello. [EMAIL PROTECTED] wrote: Hi All, I want to writting a perl script which let me override/edit the existing or created XLS. But I am unable to do that. I am not sure, do I have to use few more CPAN module or what . snip Here, at first time I am able to

Re: WMI Problem

2007-10-30 Thread Todd Beverly
Hi. StoneBeat wrote: D:\UME\tudimeloperl software.pl remotehost administrador password Caption: Producto de sistema informßtico Description: Producto de sistema informßtico Identifying Number: GB8724JDMK Name: ProLiant DL360 G5 Vendor: HP Version: undef D:\UME\tudimelo As you can

Re: hash table question

2007-08-10 Thread Todd Beverly
Mark Funk wrote: What exactly does the following Perl code do? %hash=(); open(PREVFILE, $prevfile) or die(Unable to open previous file); while(PREVFILE) { chomp; last if /BREAK/; $seen{$_}++; } close(PREVFILE); At the end of the loop, The %seen hash keys will have every

Re: Using Inline::Java

2007-04-26 Thread Todd Beverly
Alejandro Santillan wrote: Hi all: I was trying to use the module Inline::Java unsuccessfully. The code was: #!/usr/bin/perl use Inline Java = 'END_OF_JAVA_CODE' ; class Pod_alu { public Pod_alu(){ } public int add(int i, int j){ return

Re: Using Inline::Java

2007-04-26 Thread Todd Beverly
Hi. Alejandro Santillan wrote: The problem is that now I have the following error: == C:\Documents and Settings\asantillan\Desktop\perlinlinejava2.pl Can't open C:\Documents\config for output. No such file or directory at -e line 0

Re: Assistance with Spreadsheet::WriteExcel Formula

2007-02-12 Thread Todd Beverly
Nichols, Ron wrote: I am generating a spreadsheet using Spreadsheet::WriteExcel . Everything is working fine except a formula containing =SUMIF(A5:A10, C15,C5:C10). The formula gets generated correctly in the spre adsheet but in order to get the resulting value to be displayed in the

Re: Win32::FileOp Question, and Odd Error behavior

2006-10-04 Thread Todd Beverly
Dennis Daupert wrote: I'm using Win32::FileOp to copy a file to a remote machine. I've shared a directory on the remote machine, and this copy command works nicely when the network is up and everybody plays together: eval { $return = Copy ($copy_from = $copy_to ); }; To simulate

Re: Microsoft Word search and replace issue

2005-05-17 Thread Todd Beverly
Chris Cox wrote: I'm trying to write a basic perl script to open a Word document, change some predefined values to something else. It works fine on a basic document, but anything with text boxes it doesn't work at all. The script I run is: use strict; use Win32::OLE; use Win32::OLE::Const

Re: arrays of hashes

2004-01-19 Thread Todd Beverly
Hi. Nick Djurovich wrote: Hi, I'm currently doing something along the lines of this to create arrays of hashes ; my %data; sub filldata { my $type; foreach $type ('Reference','Object') { foreach (1..10) { my %info; GetData( \%info ); push

Re: Can pack do what I want?

2002-12-13 Thread Todd Beverly
Allegakoen, Justin Devanandan wrote: So question is, if this string was packed with pack in Perl would it be interpreted by the hardware that it's pumped into in the same way that the resultant compiled Pascal output would? If it helps any here's a sample Pascal line that gets compiled:-

Re: Help using XML::Parser

2002-10-31 Thread Todd Beverly
Thomas R Wyant_III wrote: snip The things that XML::Simple will lose for you include: snip * The order of duplicate tags (e.g. multiple Member tags). Does this mean that contents of the value array in the code below could be out of order? I ran it through 10 value/value tags and

Re: Quickie: command line perl, -i[ext] -pe, w2k, and *

2002-09-30 Thread Todd Beverly
Thoenen, Peter Mr. EPS wrote: Hello, Does * work with perl (on windows 2000) via command line to go through all files in a directory? Tried the following command: E:\snmp_cfgperl -i[bck] -pe s/\/php\/eps\/net$/\/htdocs\/eps\/net/; *.cfg and got the error: Can't open *.cfg: Invalid argument.

Re: Another Oracle SQL Statement Help

2002-09-06 Thread Todd Beverly
steve silvers wrote: I have a table called PERS and it has an END_DATE column. This is a date field. If the end date is set to 5 or 6 or 10 days from now I need to know when it's 1 day (24 hours) before the END_DATE. I'm trying something like: SELECT EndDate, CASE WHEN EndDate = - 86400

Re: Another Oracle SQL Statement Help

2002-09-06 Thread Todd Beverly
Richard A. Nakroshis wrote: Todd Beverly wrote: Check out the interval expression... This works in Oracle 8i: select column from table where check_date (sysdate - interval '1' day); Todd, Is 'interval' an actual Oracle statement or keyword? I couldn't find it in my Oracle 8

Re: Help counting number of instances with foreach pass through an array

2001-02-15 Thread Todd Beverly
Gary Nielson wrote: I am trying to write a script that will open a file of headlines by section. The first field (separated by the "|" delimiter) is the section name. The script will go sequentially down the file. There may be up to 25 headlines per section, all listed together before the