RE: configure a switch via ssh with a perl program

2016-07-13 Thread Taylor, Trac
Hi Lee You can use Net::SSH2 or Net::SSH::Perl to log into your switches and run any commands you need to. I actually use Net::SSH2 for this...There are a lot of examples around. You just need to do something like this... This code is only an example. my $ssh2 = Net::SSH2->new();

Rsync options not recognized by system function

2011-05-27 Thread Ezra Taylor
='*/' --exclude='*' '; my $RSYNC=/usr/bin/rsync; system($RSYNC, $RSYNC_OPTS, $host:/Blah/blah/Blue/$host_env/$cluster, /tmp/$host); -- Ezra Taylor

RE: Find duplicates in an array

2010-06-02 Thread Taylor, Andrew (ASPIRE)
I needed to find all the duplicate values in an array and their count of occurences. Any help would be appreciated . You could use a hash: use strict; use warnings; my @animals = (cat,dog,wombat,cat,monkey,cat,monkey); my %howmany; foreach my $critter (@animals) { $howmany{$critter}++; }

Please remove all references in mail archive

2010-01-06 Thread jay taylor
Hello, I am reggie kogulan.   Please remove all references in beginners.perl.org. Back in 2003, I was subscribing to this list and I stopped it. I did post many messages. I want them to be removed. Because, I did not have idea, you will be posting everything on the internet. Google is able to

RE: Monitoring multiple child processes

2009-11-10 Thread Taylor, Andrew (ASPIRE)
On some systems, waitpid may return something rather than a child pid or -1. This would happen when the wait was interrupted by something other than a child death. Most likely, it would be zero. The return status, $?, is a 16-bit word of three packed values. See `perldoc perlvar` and search

Monitoring multiple child processes

2009-11-09 Thread Taylor, Andrew (ASPIRE)
Hello I have a script that, much like the Little Old Lady who lived in a shoe, has so many children it's not sure what to do. Basically, the script does some stuff, then kicks off multiple copies of an external process that all run in parallel. It then has to wait until all of them have

RE: Monitoring multiple child processes

2009-11-09 Thread Taylor, Andrew (ASPIRE)
my $kid = waitpid($child_pid, 0); redo if $kid != $child_pid; # So goes back to start of loop from here unless( 0==$? ) # And never performs this test { die (Oh No! An external process has failed!!\n); } } That makes most sense to me but I'm not sure how to test

Filesize limit for Perl on UNIX

2009-10-19 Thread Taylor, Andrew (ASPIRE)
Hello We have a perl script that (essentially) concatenates a number of files into one. The process is more or less the following Open output file Foreach input file Open each input file write to output file close input file Close output file. The output file has cut off after hitting

RE: Write Excel and Open file from CGI

2009-05-14 Thread Taylor, Andrew (ASPIRE)
--Hello List, -- --I have a DOS batch file which has perl script that runs at the end. The --perl --script fetches information from different files and database and generates --an excel file. Is there a way I can open the excel from CGI and display on --screen? -- -- --Thanks -- --Vau # Print

RE: Sleep

2009-03-04 Thread Taylor, Andrew (ASPIRE)
Hi, How could I introduce a Sleep in Perl? Is there any specific function for that? regards, -ramesh Yes. It's called sleep sleep n - will sleep for n seconds (miss off the number and it'll sleep until interrupted) Capgemini is a trading name used by the Capgemini Group

RE: How hard is it to learn this langauge?

2009-02-09 Thread Taylor, Andrew (ASPIRE)
I came to Perl with no real programming experience (I'd looked at C and Java a bit, but never used them and messed around with simple BASIC at school). I was given the task of modifying a load of Perl code, so I went out and bought the Learning Perl book (By Randal L. Schwartz Tom

Converting a string to a filehandle

2009-02-09 Thread Taylor, Andrew (ASPIRE)
Hello I'm processing a file of test data that looks something like: FH1,data1,data2,data3,...etc FH2,data1,data2,data3,...etc FH1,data1,data2,data3,...etc Each line split into an array and processed. The first element (FH1, FH2, etc) is the name of the filehandle the output should be printed

Neater way to declare variables

2009-01-08 Thread Taylor, Andrew (ASPIRE)
Taylor Andrew Taylor | Capgemini | Telford ASPIRE Data Warehouse Support T : +44 (0)1952 430684 | www.capgemini.com http://www.capgemini.com/ Capgemini is a trading name used by the Capgemini Group of companies which includes Capgemini UK plc, a company registered

RE: String concatination.

2008-11-10 Thread Taylor, Andrew (ASPIRE)
Try: print abc${string}zyx\n; or print abc.$string.zyx\n; Cheers Andy -Original Message- From: Sureshkumar M (HCL Financial Services) [mailto:[EMAIL PROTECTED] Sent: 10 November 2008 15:34 To: beginners@perl.org Subject: String concatination. Hi all, I have a string like below.

Tracking which elements from an array have been matched.

2008-10-29 Thread Taylor, Andrew (ASPIRE)
inefficient, and I'm sure there must be a better way of doing this. This is part of a larger script that is becoming quite large so I'm trying to be more efficient (and to improve my coding). Can anyone offer any suggestions. Cheers Andy Taylor Capgemini is a trading name used by the Capgemini

RE: Tracking which elements from an array have been matched.

2008-10-29 Thread Taylor, Andrew (ASPIRE)
On Wed, 2008-10-29 at 16:29 +, Taylor, Andrew (ASPIRE) wrote: I have an array of records. I need to search this array for a particular record (or records) based on a record id. This is simple enough (e.g. using the grep function) @found = grep {/$rec_id/} @array; However, I also

Serial Ports

2006-06-22 Thread Scott Taylor
Hello all, I have a robot that sends data over a serial connection and I'd like to use Perl/Linux to listen to the Serial Port and record the data. Can anyone suggest the best package to do this? I need to be able to set Baud rates and such too. I'm looking at Device::SerialPort, but is that

Re: Trying to add hyperlink

2006-06-22 Thread Scott Taylor
On Thu, June 22, 2006 09:25, chen li wrote: --- Prabu [EMAIL PROTECTED] wrote: Hello, Hope this is your need... #!/usr/bin/perl -w use warnings ; use CGI qw/:standard/; print header, start_html(Stsd ILO Links), h1(Stsd ILO Links) ; print table({-border=undef,,-width='75%',

HTML to Text

2006-05-02 Thread Scott Taylor
Hello all, I have an HTML file that I need to extract the text data from. What modules do I need to be able to do this? I was looking at HTML::Parser but it doesn't make any sense and probably not what I'm looking for. my simple input file will look like this: HTML HEAD TITLEBin

RE: HTML to Text

2006-05-02 Thread Scott Taylor
On Tue, May 2, 2006 13:45, Russ Foster wrote: -Original Message- HTML HEAD TITLEBin Server/TITLE /HEAD BODY pData that I need/p pData that I need/p /BODY /HTML I want the output to just be lines of Data that I need stored in a string, that I can work on each line one at a

Re: HTML to Text

2006-05-02 Thread Scott Taylor
On Tue, May 2, 2006 12:55, Randal L. Schwartz wrote: Scott == Scott Taylor [EMAIL PROTECTED] writes: Scott my simple input file will look like this: Scott HTML Scott HEAD Scott TITLEBin Server/TITLE Scott /HEAD Scott BODY Scott pData that I need/p Scott pData that I need/p Scott

SCO OSR5 and DBI

2006-01-18 Thread Scott Taylor
Hello, I'm trying to install DBI modules and I'm getting the following message from 'make': gcc -c-DPERL_SCO -DPERL_SCO507 -DHAS_FPSETMASK -D_REENTRANT -march=i 586 -mcpu=i586 -O6 -fomit-frame-pointer-DVERSION=\1.50\ -DXS_VERSION=\1. 50\ -fPIC

compiling DateTime module on SCO OSR5

2006-01-10 Thread Scott Taylor
Hello all, I'm trying to compile DateTime module for Perl in SCO OSR5.07 and failing miserably. I have no idea what these errors mean. Can anyone tell me what I need, or what I'm doing wrong? All tests in the make test are failing with messages like this one: PERL_DL_NONLAZY=1

Re: compiling DateTime module on SCO OSR5

2006-01-10 Thread Scott Taylor
BTW, I originally tried installing it through perl -MCPAN -e shell always running installs as root. Scott Taylor said: Hello all, I'm trying to compile DateTime module for Perl in SCO OSR5.07 and failing miserably. I have no idea what these errors mean. Can anyone tell me what I need

Re: compiling DateTime module on SCO OSR5

2006-01-10 Thread Scott Taylor
Tom Phoenix said: On 1/10/06, Scott Taylor [EMAIL PROTECTED] wrote: I'm trying to compile DateTime module for Perl in SCO OSR5.07 and failing miserably. # Error: Can't locate loadable object for module DateTime in @INC It looks as if something failed long before this point, during

Re: compiling DateTime module on SCO OSR5

2006-01-10 Thread Scott Taylor
Tom Phoenix said: On 1/10/06, Scott Taylor [EMAIL PROTECTED] wrote: I'm trying to compile DateTime module for Perl in SCO OSR5.07 and failing miserably. # Error: Can't locate loadable object for module DateTime in @INC It looks as if something failed long before this point, during

Re: XML Help

2005-11-04 Thread Scott Taylor
Bob Showalter said: Scott Taylor wrote: Dermot Paikkos said: I would also say that the source file is wrong, it should read STREETNUM/STREETNUM I read somewhere that blah / is correct syntax (same as blah/blah) You are correct. The two forms are exactly equivalent. see: http://www.w3.org

Re: XML Help

2005-11-04 Thread Scott Taylor
Bob Showalter said: Scott Taylor wrote: Hi All, I'm using XML::Simple to parse a very simple XML file and dump the data into hashes of hashes. The problem I'm getting, is sometimes information is blank in the XMl file; it looks like this: STREETNUM/ instead of STREETNUM1234/STREETNUM

Dates

2005-11-04 Thread Scott Taylor
Hello, I have a date in UT that looks like this: 2005-11-02 01:36:00.0 Can anyone tell me the best way to subtract 8 hours from it, or to convert it to PDT? I'm reading up on Date::Manip, but I don't know if that is going to help, yet. Cheers. -- Scott -- To unsubscribe, e-mail: [EMAIL

XML Help

2005-11-03 Thread Scott Taylor
Hi All, I'm using XML::Simple to parse a very simple XML file and dump the data into hashes of hashes. The problem I'm getting, is sometimes information is blank in the XMl file; it looks like this: STREETNUM/ instead of STREETNUM1234/STREETNUM and when I print the hash: print

Re: XML Help

2005-11-03 Thread Scott Taylor
Dermot Paikkos said: On 3 Nov 2005 at 7:45, Scott Taylor wrote: Hi All, I'm using XML::Simple to parse a very simple XML file and dump the data into hashes of hashes. The problem I'm getting, is sometimes information is blank in the XMl file; it looks like this: STREETNUM/ instead

Re: $ or % For Associative Arrays?

2005-09-02 Thread Scott Taylor
Mark Sargent said: Hi All, am new to Perl. I'm followig this tutorial, http://www.cs.unc.edu/~jbs/resources/perl/perl-basics/variables.html and am confused as to why the below shows examples with $ and some with % at the beginning of the statement. When it says, Perl uses the percent

Re: Fw: Could [you] [please] tell me how to remove white spacees presentbetween delimiter[s]

2005-09-02 Thread James Taylor
#!/usr/bin/perl my $st1='---'~^ '123PS01D'~^; for(split(/\~\^/,$st1)) { $_ =~ s/\s//g; # Do something with your variable } Is that what you're asking? I'm unsure [EMAIL PROTECTED] wrote: '---'~^ '123PS01D'~^ here delimiter is ~^ '---'~^'123PS01D'~^ Do u see the

Re: Parsing HTML

2005-09-01 Thread Scott Taylor
Jenda Krynicky said: From: Scott Taylor [EMAIL PROTECTED] I'm probably reinventing the wheel here, but I tried to get along with HTML::Parser and just couldn't get it to do anything. To confusing, I think. I simply want to get a list or real words from an HTML string, minus all the HTML

Re: Parsing HTML

2005-09-01 Thread Scott Taylor
Jenda Krynicky said: From: Scott Taylor [EMAIL PROTECTED] I'm probably reinventing the wheel here, but I tried to get along with HTML::Parser and just couldn't get it to do anything. To confusing, I think. I simply want to get a list or real words from an HTML string, minus all the HTML

Re: DBD::Oracle installation script assumes oracle is installed local ly?

2005-08-31 Thread Scott Taylor
[EMAIL PROTECTED] said: Hi all. I am attempting to install DBD::Oracle from the perl CPAN shell. The installation script seems to assume that oracle is installed locally. It asks me to set ORACLE_HOME to the path the oracle is installed and to try again. Well I don't have oracle installed

Re: can any body tell me how to remove quotes from a name.

2005-08-31 Thread Scott Taylor
Eric Walker said: if the 'mayank' is in a text file, then cat file | sed s/\'//g newfile this should do it I think. LMAO - Nice, for a top poster, On Wednesday 31 August 2005 03:42 am, [EMAIL PROTECTED] wrote: Hi all Could any body tell me how to get mayank from

Re: Escaping with tr

2005-08-30 Thread Scott Taylor
Bernard van de Koppel said: Hi, How can I get all the characters out of a csv file. Input looks like bla bla;bla bla;bla bla and it has to look like bla bla;bla bla; bla bla I tried $text=~ tr(#\##); but perl keeps complaining about Might be a runaway multi-line ;; starting on the

Re: Escaping with tr

2005-08-30 Thread Scott Taylor
Wiggins d'Anconia said: Scott Taylor wrote: I did not. Hi, How can I get all the characters out of a csv file. Input looks like bla bla;bla bla;bla bla and it has to look like bla bla;bla bla; bla bla I tried $text=~ tr(#\##); but perl keeps complaining about Might be a runaway multi-line

Parsing HTML

2005-08-29 Thread Scott Taylor
Hi, I suck at regex, but getting better. :) I'm probably reinventing the wheel here, but I tried to get along with HTML::Parser and just couldn't get it to do anything. To confusing, I think. I simply want to get a list or real words from an HTML string, minus all the HTML stuff. For

Re: Need a list of files in a dir.

2005-08-25 Thread Ezra Taylor
Your a funny dude Chris. On 8/25/05, Chris Devers [EMAIL PROTECTED] wrote: On Thu, 25 Aug 2005, Luinrandir wrote: How do I get the list of files in a DIR and put in an array? I'm drawing a blank on my search for this. Try writing a program instead, that seems to work better than

Shell output

2005-08-23 Thread Scott Taylor
Hello all, I have a CGI script that I need to display the output of a shell program, basically a simple C program that parses some text. The output is right to the browser, and I don't want it to be creating any new files or anything. I have a data field that has a blob and that blob needs to

Re: Shell output

2005-08-23 Thread Scott Taylor
Wiggins d'Anconia said: Scott Taylor wrote: Hello all, I have a CGI script that I need to display the output of a shell program, basically a simple C program that parses some text. The output is right to the browser, and I don't want it to be creating any new files or anything. I have

Re: Shell output

2005-08-23 Thread Scott Taylor
Jay Savage said: On 8/23/05, Scott Taylor [EMAIL PROTECTED] wrote: Hello all, I have a CGI script that I need to display the output of a shell program, basically a simple C program that parses some text. The output is right to the browser, and I don't want it to be creating any new

escaping in CGI.pm

2005-06-24 Thread Scott Taylor
Grr... Arg... Hello all, I'm working on my first Perl/CGI database app and run into a bit of a snag: http://myserver/lseid.cgi?LeaseOPID=ADT89theCmd=EditIt this line finds the right data however, everything after the in the LeaseOPID ($row-{leaseopid}) ADT89 gets truncated in this form line:

Re: escaping in CGI.pm

2005-06-24 Thread Scott Taylor
Joshua Colson said: Scott, You're trying to use an ampersand in your URL. Ampersands are special characters in URLs so you must escape it if you want it to be passed as the actual character instead of carrying the special meaning. See http://www.december.com/html/spec/esccodes.html As I

Re: XML

2005-05-19 Thread Scott Taylor
Thank you for most helpful information. :) Offer Kaye said: On 5/19/05, Scott Taylor wrote: ... to pump out lines of data to my SQL statement. I'll need to end up with something like: qw($vid,$eid,$event,$desc ,$date,$mid_desc,$mid_val ,$pid_desc,$pid_val,$min,$max,$val) for each

XML

2005-05-18 Thread Scott Taylor
Hello, I have an XML file that I need to import to a database, however, searching CPAN for XML brings up a lot of stuff. I don't know what I need to know. :( What module should I use for something simple like the following data? Can someone provide an example, or direct me to some good docs

Re: XML

2005-05-18 Thread Scott Taylor
Wiggins d'Anconia said: Scott Taylor wrote: Hello, I have an XML file that I need to import to a database, snip What module should I use for something simple like the following data? I would start with XML::Simple until you need more. use XML::Simple; my $xs = new XML::Simple; my

Re: Use Perl to extract keywords

2005-04-24 Thread Ezra Taylor
Robert: An example is below. #!/usr/bin/perl -w open(FILE,/etc/passwd) || die Cannot open file: $!; while ( FILE ) { if( /Ezra/ ) #I'm searching for strings with the word Ezra. { print $_; # Now I'm printing lines with the name Ezra } } close(FILE); On

Re: ideintifying whether a module is already installed or not

2005-03-27 Thread Mark Taylor
Hi list, How do I know whether a given module is installed on machine or not? Thanks and Regards, Manish Hi Manish - The way I check to see if a module is installed perl -e use ModuleName; (eg. perl -e use XML::Simple: If you get an error, then it is not installed. Now I use ActiveState Perl on

Re: read a directory

2005-02-28 Thread Mark Taylor
Hey Carl - I got in a hurry and did some cut and paste without paying close enough attention. The line should read my $dir = 'C:\GIS\wrapped_data'; I apologize for the error. Mark got this error line 9 near = = aborted due to compilation error */Mark Taylor [EMAIL PROTECTED]/* wrote

Re: Filter Regular Expressions

2005-02-07 Thread Ezra Taylor
Gomez, Gonzalo wrote: Hi, I want to filter text using regular expressions, but i don't know how to find in a file a string like this NONE , or NONE/ , or /bsvgId , Etc. I try to use the little script bellow with a count for the word but this scrit doesn't work if i put symbols like / , \ , ,

Storing $DIGIT variables in arrays

2005-01-23 Thread Jesse Taylor
45.45.45.45. The emails are working fine, however and all show up in the output file. Any help on this would be appreciated. Thanks, Jesse Taylor ##--START CODE--## #!/usr/bin/perl -w #Given a text file containing URLs, this script will extract any IP addresses or email address from said URLs use

Re: Mod_Perl Pass Associative Arrays

2004-12-11 Thread James Taylor
Chris Devers wrote: On Fri, 10 Dec 2004, James Taylor wrote: Hi everyone, wondering if anyone knew how to pass an associative array via POST to mod_perl. Something like: HTML forms don't really provide for complex data structures, so any solution is going to have to be cobbled together. I

Mod_Perl Pass Associative Arrays

2004-12-10 Thread James Taylor
Hi everyone, wondering if anyone knew how to pass an associative array via POST to mod_perl. Something like: input type=text name=search[name] / input type=text name=search[email / then it posts to say.. example.pl my $r=Apache-request; my $req=Apache::Request-new(shift); my

setting more than 1 -domain= in cookies

2004-12-03 Thread A Taylor
Hello all, I have a perl script that I am using to write a cookie: my $cookie = new CGI::Cookie(-name='usrID', -value=$usrID, -expires='+4h', -domain='.mydomain.com', -path='/'); ## send cookie print Set-Cookie: $cookie\n; What I want to know is the a way

Cookies and frames

2004-12-03 Thread A Taylor
Hello all, First a big thanks for all your help - its been invaluable and helpful with my education. Perl rocks and it has been made easier to learn because of this forum :-) OK - Now for my question. I have created a shopping cart (using perl of course :-) ) and it works fine until I put the

$ID = $newcook{'usrID'}-value;

2004-12-02 Thread A Taylor
Hello again, I have a problem with cookies; I can retreive cookies i have set, but if I try to retreive a cookie that hasnt yet been set i get the following error: Can't call method value on an undefined value at viewcart.pl line 55. I am trying to get my cookie using: $ID =

question about doing it right in CGI

2004-11-19 Thread Lewick, Taylor
the first value should be 0, in case they do not enter anything? Thanks in advance, Taylor -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

CGI.pm program

2004-11-19 Thread Lewick, Taylor
idea why this happens when I use the CGI.pm module? Thanks, Taylor -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

RE: more cookies in perl and asp

2004-11-07 Thread A Taylor
Anadi, are the Perl scripts and the ASPs on the same server (webhost, not machine!)? In the same directory? Maybe you have to specify the domain when creating the cookie. Jenda Hello Jenda, Both the perl scripts and the asp's are run on the same server BUT the asp's are run from a different

more cookies in perl and asp

2004-11-05 Thread A Taylor
Thanks for your reply, I am going to re-write my problem; I am creating a cookie in perl script: $usrID = createUsrID(); ## create cookie my $cookie = new CGI::Cookie(-name='usrID',-value=$usrID); ## send cookie print Set-Cookie: $cookie\n; and then I am trying to recall that cookie in an

How do I set POST vars from a perl script

2004-11-05 Thread A Taylor
Hi all, I am trying to set some HTTP header variables in a perl script that I can then pick up in another script. I want to create a situation as if some one had POSTed variables from a form. I then want to pick these variables up in an .asp script. I have tried picking up cookies with an asp

cookies in perl and asp

2004-11-04 Thread A Taylor
Hi all, I have a problem that I am hoping someone can shed some light on. I have written a cookie in perl and what I want to do is read the cookie back but in an asp script. I can read the cookie back in other perl scripts but the asp script doesnt see it. Why is this and is there anyway around it

Mod_Perl Target Headers

2004-11-04 Thread James Taylor
I posted this to the mod_perl list originally, but noone ever answers my questions on there. Guess my noob questions don't belong on that list: Again, this is for mod_perl Should be a pretty simple question, looking for an option in header_out to target a frame. For example... snip

Help with sprintf and prinf

2004-10-21 Thread A Taylor
Hi all, I am trying to figure out sprint and prinf: what I am trying to do is format a number into a currency, so 9.9 would be printed as 9.90 Can anyone give me a simple example of this - i am not having any joy by myself :s Thanks in advance Anadi

Help with sprintf and prinf

2004-10-21 Thread A Taylor
Hi all, I am trying to figure out sprint and prinf: what I am trying to do is format a number into a currency, so 9.9 would be printed as 9.90 Can anyone give me a simple example of this - i am not having any joy by myself :s Thanks in advance Anadi

Help with sprintf and prinf

2004-10-21 Thread A Taylor
Hi all, I am trying to figure out sprint and prinf: what I am trying to do is format a number into a currency, so 9.9 would be printed as 9.90 Can anyone give me a simple example of this - i am not having any joy by myself :s Thanks in advance Anadi

Help with sprintf and prinf

2004-10-21 Thread A Taylor
Hi all, I am trying to figure out sprint and prinf: what I am trying to do is format a number into a currency, so 9.9 would be printed as 9.90 Can anyone give me a simple example of this - i am not having any joy by myself :s Thanks in advance Anadi

RE: Help with sprintf and prinf

2004-10-21 Thread A Taylor
Thank you for your help - didnt mean to send the last email so many times - it wont happen again :-) A Do not do that. Please. One copy is plenty. I am trying to figure out sprint and prinf: what I am trying to do is format a number into a currency, so 9.9 would be printed as 9.90 Can

help - $line =~ tr/images\//..\/..\/images\//

2004-10-19 Thread A Taylor
Hi all, I wonder if someone can help me. What I want to do sounds so simple but I just cant crack it. I am reading in an html page and i want to change 'images/' to '../../images' but i am going round and round in circles. my code so far is this: #!/usr/bin/perl ## set up for output to be sent to

Re: Mod Perl Helper Functions

2004-10-05 Thread James Taylor
Bob Showalter wrote: FWIW, That example works OK for me under Apache 1.3.31, mod_perl 1.29 when I run under Apache::Registry. I had to add a declaration for %somehash, but otherwise it runs without error. Is main.pl running under Apache::Registry, or is it a PerlHandler or some other type of

Test For Dupplicate elements in an array

2004-04-20 Thread neill . taylor
I need to test if an array holds duplicates, and if so do something. What is the slickest way of doing this ? Neill __ Broadband from an unbeatable £15.99! http://www.tiscali.co.uk/products/broadband/home.html?code=SM-NL-11AM -- To

Learning how to map a drive in Perl

2004-03-25 Thread neill . taylor
I am looking at how I could connect to share and map a local drive in a perl script. I have cut and pasted the code from the man page from Lanman to understand what is happening. When I run the code below I get the following error Undefined subroutine main::USE_IPC called at map.pl line 5. Am I

Re: Modifying STDIN

2004-03-16 Thread James Taylor
I actually can't do it that way, this is a part of a custom perl module that someone wrote, and those are just 2 lines from the module. On Mar 15, 2004, at 11:01 PM, Randy W. Sims wrote: On 03/16/04 00:06, James Taylor wrote: I'm modifying a script someone wrote that basically reads a file file

Modifying STDIN

2004-03-15 Thread James Taylor
I'm modifying a script someone wrote that basically reads a file file into STDIN, and I was curious if there was anyway of modifying the stdin value without having to first open the file, modify it, close the file, and then open it into stdin. Basically, looks like: open(STDIN,$filename) ||

WWW::Mechanize through a proxy?

2004-03-11 Thread Taylor James
Hi all, Has anyone here sucessfully used WWW::Mechanize through a proxy server? This always fails for me. On Win32. Cheers, James #! /usr/bin/perl use strict; use WWW::Mechanize; my $a = WWW::Mechanize-new(); my $url =

Image::Magick Montage usage

2004-03-10 Thread Taylor James
Hi there, I have 189 gif images at 200x200 and I want to combine them in a 3x61 arrangement, ending up with a 600x12200 gif. Firstly is this just crazy talk? I realise this is a large image, but I've dealt with larger in the past. Secondly, what the hell am I doing wrong!? My code is below. I

RE: Image::Magick Montage usage

2004-03-10 Thread Taylor James
Wiggins d Anconia wrote: HTH, Indeed, you're right of course. I have a hunch that this is more than a resource issue, but of course I should try using less images first to eliminate it as a possibility. I'll try later and let you know how I get on. I was kind of hoping someone would spot an

RE: Image::Magick Montage usage

2004-03-10 Thread Taylor James
Wiggins d Anconia wrote: I also notice that you catch the return result of 'Write' and then warn if it is positive, but 'Write' returns the number of images written, so it should be positive. I suspect this is because it is just test code, but you will likely need to correct that before

RE: Image::Magick Montage usage

2004-03-10 Thread Taylor James
Taylor James wrote: Another good idea, which I shall try tonight along with the others, or this afternoon if I can get Image::Magick installed on my work PC. That's another story! Done that, and revised the code as discussed earlier and it still seems to be hangign at the same point (just

sorting hash list for CGI Form

2004-03-09 Thread Scott Taylor
Hello all, When I populate this hash (%SrcIDs) from SELECT id, desc, from myTable order by desc it doesn't order by the description field desc. (printing each row in the while loop show that the SQL is sorted) while( my($id, $desc) = $sth-fetchrow ) { $SrcIDs{$id} = $desc; }

RE: Automatically write in uppercase

2004-03-03 Thread Taylor James
James Edward Gray II wrote: On Feb 29, 2004, at 6:30 AM, John wrote: That's a nice method but i would prefer to activate the CAPS-LOCK and user write in capitals in my text entry widget I would prefer you didn't. ;) The keyboard takes commands from me, not the computer. If a program

IPTC Captions

2004-02-02 Thread neill . taylor
I need to manipulate the IPTC captions within a jpeg using Perl. Is their a module or an easy way of doing this in Perl ? Thanks Neill IMPORTANT NOTICE This email (including any attachments) is meant only for the intended recipient. It may also contain confidential

Covert Date to week number

2004-01-22 Thread neill . taylor
Is their a way in PERL to covert a date to a week number Cheers Neill IMPORTANT NOTICE This email (including any attachments) is meant only for the intended recipient. It may also contain confidential and privileged information. If you are not the intended

Delete multiple blank lines

2004-01-20 Thread Lewick, Taylor
Hi all, I could use some help with an expression or code to delete multiple blank lines and replace it with only one blank line... I know how this can be done in sed, but am not sure how to do it in perl... Thanks, Taylor -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e

Reg Ex help...

2004-01-20 Thread Lewick, Taylor
it not to match that... I know I have to replace \D+ but what with? What is the metacharacter if there is one to just match a letter? Thanks, Taylor

RE: Data File, turn fields on mulitple lines into records on one li ne.. .

2004-01-16 Thread Lewick, Taylor
Thanks Ron, will give that a try.. One more for everyone... In my perl script, I did a quick cheat by using the systems grep command... I tried: `/usr/bin/grep -v BLAH | /usr/bin/grep -v COW | /usr/bin/grep -v STUFF file1file2`; And this doesn't work. Sometimes it will get rid of STUFF. It

RE: Data File, turn fields on mulitple lines into records on one li ne.. .

2004-01-16 Thread Lewick, Taylor
Okay, I redid it so it looks like this... `grep -v STUFF:STUFF file1 file2`; (I am looking for the string STUFF:STUFF and that didn't work... but it works via command line... Any ideas? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Data File, turn fields on mulitple lines into records on one li ne.. .

2004-01-16 Thread Lewick, Taylor
So you recommend using regular expressions instead of grep..? Care to provide an example in this case? -Original Message- From: Wiggins d Anconia [mailto:[EMAIL PROTECTED] Sent: Friday, January 16, 2004 3:16 PM To: Lewick, Taylor; [EMAIL PROTECTED] Subject: RE: Data File, turn fields

RE: Data File, turn fields on mulitple lines into records on one li ne.. .

2004-01-16 Thread Lewick, Taylor
PROTECTED] Subject: Re: Data File, turn fields on mulitple lines into records on one li ne.. . Taylor Lewick wrote: Okay, I redid it so it looks like this... `grep -v STUFF:STUFF file1 file2`; Is that what the ACTUAL line looks like? (I am looking for the string STUFF:STUFF and that didn't

perl grep..

2004-01-16 Thread Lewick, Taylor
ET:Name:Name:STUFF:STUFF:STUFF Would the example you provided still match this line? I suspect this is the issue but am not sure. Would I need something like /.*STUFF:STUFF/ ? Thanks again, Taylor -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

Data File, turn fields on mulitple lines into records on one line.. .

2004-01-15 Thread Lewick, Taylor
Hi all. Need some help. I have a data file that looks like this... Date Team Name 1 Team Name 2 Field1 Field2 FieldX Date Team Name 3 Team Name 4 Field 1 FieldX and so on... Each entry will have the data and team 1 and 2's name. But the number of fields will be variable... I would really

Re: Clearing Arrays

2004-01-13 Thread neill . taylor
I thought this newsgroup was for beginners! Ramprasad A

Image Magick

2004-01-09 Thread Scott Taylor
Hello all, I am trying to use Image::Magick to resize a JPEG. This routine works to display the full size image from a blob in my Firebird database: while ( my ($PixData ) = $sth-fetchrow ) { print header('image/jpeg'); print $PixData; } But when I

Re: Image Magick

2004-01-09 Thread Scott Taylor
At 10:28 AM 01/09/2004, Wiggins d Anconia wrote: Hello all, I am trying to use Image::Magick to resize a JPEG. This routine works to display the full size image from a blob in my Firebird database: while ( my ($PixData ) = $sth-fetchrow ) { print

Re: Image Magick

2004-01-09 Thread Scott Taylor
At 11:02 AM 01/09/2004, Scott Taylor wrote: At 10:28 AM 01/09/2004, Wiggins d Anconia wrote: http://www.ImageMagick.org/www/perl.html Check the above for an example of how to print an image to a filehandle, in your case you want the default STDOUT I've been all over that page, but I'm

regex multiple lines

2004-01-02 Thread James Taylor
I'm trying to parse a bit out of an HTML file, where the formatting could change daily as far as spaces/newlines go. Say for example I have something like this: $str=EOF; html body pHello this is juts an example/p p!---begin---a href=nowhere.comblahahahaha/a /pa href= http://www.somewhere.com;

Re: regex multiple lines

2004-01-02 Thread James Taylor
=$a.$repl.$d; I'd still like to know if you can do this via regex however. On Jan 2, 2004, at 5:38 PM, James Taylor wrote: I'm trying to parse a bit out of an HTML file, where the formatting could change daily as far as spaces/newlines go. Say for example I have something like this: $str=EOF

  1   2   3   >