Re: logical "and" pattern matching

2003-02-19 Thread John W. Krahn
Gary Merrick wrote: > > >Homework help is a touchy subject on this list. What have you tried? > > > >Have you read: > >perldoc perlop > >perldoc perlretut > > Yow! Ok, I have now. I suppose I've missed something, since I haven't yet come > up with a solution. :-\ > > >One sticky point with an

RE: logical "and" pattern matching

2003-02-19 Thread Gary Merrick
>Homework help is a touchy subject on this list. What have you tried? > >Have you read: >perldoc perlop >perldoc perlretut Yow! Ok, I have now. I suppose I've missed something, since I haven't yet come up with a solution. :-\ >One sticky point with and/or is that you need to break complex >sta

Re: Chopping strings

2003-02-19 Thread John W. Krahn
David --- Senior Programmer Analyst --- Wgo Wagner wrote: > > You might look at sysopen, sysread which allows you to read in max > blocks of data and process that data. > > It would look something like: > > sysopen(FILEIN,$filein,0) || die "unable to open file $filein: $!";

Re: Copying directory structure and its content

2003-02-19 Thread Sudarshan Raghavan
Pankaj Kapare wrote: > Hi, > > I want to copy whole directory structure and its containts(may be file and folders >under source directory) to destination directory .i dont know how to do this .Can >anybody help me. > Thanks in advance ! > Pankaj Any reason for doing this in perl. To answer you

Re: Copying directory structure and its content.

2003-02-19 Thread Victor Tsang
In shell, you can use cp -r or rsync I have never done such thing in perl, but this library might be what you need. http://theoryx5.uwinnipeg.ca/CPAN/data/File-DirSync/README.html Tor. Pankaj Kapare wrote: > > Hi, > > I want to copy whole directory structure and its containts(may be file and

Copying directory structure and its content.

2003-02-19 Thread Pankaj Kapare
Hi, I want to copy whole directory structure and its containts(may be file and folders under source directory) to destination directory .i dont know how to do this .Can anybody help me. Thanks in advance ! Pankaj

RE: Perl Script

2003-02-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
James Parsons wrote: > Ok here go's again. > > > I have anywhere from 1 - 15 files in a directory, and I could have > up to 5 files with the same header record. and the rest have > different header records. So what I would like to is > > read each file and when there's a match rename that f

Re: logical "and" pattern matching

2003-02-19 Thread R. Joseph Newton
Gary Merrick wrote: > Ok, so this is probably a stupid question, but I'm a newbie, and therefore > stupid. :-] It'll take you about 5 seconds to figure this one out. > > I have an assignment that requires me to find words in a dictionary that contain > all five vowels (a, e, i, o, and u). I've

Re: logical "and" pattern matching

2003-02-19 Thread Wiggins d'Anconia
Gary Merrick wrote: Ok, so this is probably a stupid question, but I'm a newbie, and therefore stupid. :-] It'll take you about 5 seconds to figure this one out. I have an assignment that requires me to find words in a dictionary that contain all five vowels (a, e, i, o, and u). I've figured o

Re: How to display dir contents on web page?

2003-02-19 Thread R. Joseph Newton
"Scott, Deborah" wrote: > Does anyone know where I can get a script that looks into the contents of a > directory and outputs the contents of the directory into a list that is > displayed on an HTML page? (Also, the names should contain hyperlinks to > those contents.) > > Or, how would I do this?

logical "and" pattern matching

2003-02-19 Thread Gary Merrick
Ok, so this is probably a stupid question, but I'm a newbie, and therefore stupid. :-] It'll take you about 5 seconds to figure this one out. I have an assignment that requires me to find words in a dictionary that contain all five vowels (a, e, i, o, and u). I've figured out the logical "or" p

RE: Chopping strings

2003-02-19 Thread Wagner, David --- Senior Programmer Analyst --- WGO
John W. Krahn wrote: > Papapep wrote: >> >> How should I do to split a long string that the only thing I know is >> that is a multiple of a previous defined number (for example 26). >> >> A graphic example: >> abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwx yzabcdefgh

Re: Writing to data files with IIS

2003-02-19 Thread R. Joseph Newton
dan wrote: > I'm writing an administration script for a website, it reads files fine, > however when it comes to open files for writing, I get the "Permission > denied" error message. I'm not exactly sure what's wrong with this. Is this > a configuration problem at IIS's end, or do I need to do so

Re: Where to I get sendmail for Win98?

2003-02-19 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > > On Wed, 19 Feb 2003 13:02:29 -0800, "R. Joseph Newton" <[EMAIL PROTECTED]> wrote: > > > Steve Maroney wrote: > > > > > Is there a Sendmail port to Winblows ? I dont think there is . > > > > > > Thank you, > > > Steve

Re: How to display dir contents on web page?

2003-02-19 Thread Pete Emerson
On Wed, 19 Feb 2003, Scott, Deborah wrote: > Does anyone know where I can get a script that looks into the contents of a > directory and outputs the contents of the directory into a list that is > displayed on an HTML page? (Also, the names should contain hyperlinks to > those contents.) Deborah,

RE: How to display dir contents on web page?

2003-02-19 Thread Dan Muey
use File::Slurp; @files = read_dir("/home/joemama/public_html/files"); # may be readdir see http://search.cpan.org for details foreach $f(@files) { print "http://www.domain.com/files/$f\";> $f \n"; } > > > Does anyone know where I can get a script that looks into the > contents o

Re: SSL

2003-02-19 Thread Randal L. Schwartz
> "Hytham" == Hytham Shehab <[EMAIL PROTECTED]> writes: Hytham> hi guys, Hytham> If someone want some interaction with the web, he might use LWP and Hytham> WWW::Mechanize, thats good, but thats not good if he wants to work with SSL. Hytham> how can i integrate my script with SSL? https w

How to display dir contents on web page?

2003-02-19 Thread Scott, Deborah
Does anyone know where I can get a script that looks into the contents of a directory and outputs the contents of the directory into a list that is displayed on an HTML page? (Also, the names should contain hyperlinks to those contents.) Or, how would I do this? Thanks! Deborah

Re: Chopping strings

2003-02-19 Thread John W. Krahn
Jenda Krynicky wrote: > > while ($long_string ne '') { > my $chunk = substr( $long_string, 0, 26); > substr( $long_string, 0, 26) = ''; Or just: my $chunk = substr( $long_string, 0, 26, '' ); But that is inefficient because you modify the beginning of the string on each

Perl Script

2003-02-19 Thread James Parsons
Ok here go's again. I have anywhere from 1 - 15 files in a directory, and I could have up to 5 files with the same header record. and the rest have different header records. So what I would like to is read each file and when there's a match rename that file to something else example

Re: Complaint from 'use strict' about bareword;

2003-02-19 Thread John W. Krahn
Gan Uesli Starling wrote: > > I get this complaint from 'use strict'; > > > Bareword "ckKeyBts" not allowed while "strict subs" > > in use at gus_perl/FYBB_DirTree.pm line 425. > > I know what it means. I have a sub which is defined > later in the script than it is called on line 425. > > Aft

Re: Chopping strings

2003-02-19 Thread John W. Krahn
Papapep wrote: > > How should I do to split a long string that the only thing I know is > that is a multiple of a previous defined number (for example 26). > > A graphic example: > >abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyz > > That

Re: Chopping strings

2003-02-19 Thread Jenda Krynicky
From: papapep <[EMAIL PROTECTED]> > How should I do to split a long string that the only thing I know is > that is a multiple of a previous defined number (for example 26). > > A graphic example: > > abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqr > stuvwxyzabcdefghijklmnop

Re: Complaint from 'use strict' about bareword;

2003-02-19 Thread Jenda Krynicky
From: Gan Uesli Starling <[EMAIL PROTECTED]> > I get this complaint from 'use strict'; > > > Bareword "ckKeyBts" not allowed while "strict subs" > > in use at gus_perl/FYBB_DirTree.pm line 425. > > I know what it means. I have a sub which is defined > later in the script than it is called on li

Re: Where to I get sendmail for Win98?

2003-02-19 Thread wiggins
On Wed, 19 Feb 2003 13:02:29 -0800, "R. Joseph Newton" <[EMAIL PROTECTED]> wrote: > Steve Maroney wrote: > > > Is there a Sendmail port to Winblows ? I dont think there is . > > > > Thank you, > > Steve Maroney > > Yes. Mail::Sendmail can be

Writing to data files with IIS

2003-02-19 Thread dan
I'm writing an administration script for a website, it reads files fine, however when it comes to open files for writing, I get the "Permission denied" error message. I'm not exactly sure what's wrong with this. Is this a configuration problem at IIS's end, or do I need to do soemthing special with

RE: Module usage ?

2003-02-19 Thread Dan Muey
> > > hi all, > i want to know if i 'use somemodule' in a perl program how > does it affect the performance (in terms of being fast) of Well that depends on lots of things. Generally modules are the best way to go as they are portable and great speedwise for various reasons. Now actuall

RE: sending files from one server to another.

2003-02-19 Thread Dan Muey
use LWP::Simple; use Net::FTP; http://search.cpan.org Very nice tools! > -Original Message- > From: Mike Blezien [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, February 19, 2003 8:47 AM > To: [EMAIL PROTECTED] > Subject: sending files from one server to another. > > > Hello all, > > b

Re: Reading Tk::Text widget

2003-02-19 Thread Steve Lobach
In case anybody wanted to know.. I figured it out.. used a while loop instead. sub OnEval{ # get the text from PegText # and set a var by catinating the peg command with the contents of PegText my $widget = $OutputText->Subwidget("text"); tie *STDOUT, ref $widget, $widget; my $loop_ch

Re: Where to I get sendmail for Win98?

2003-02-19 Thread R. Joseph Newton
Steve Maroney wrote: > Is there a Sendmail port to Winblows ? I dont think there is . > > Thank you, > Steve Maroney Yes. Mail::Sendmail can be istalled quickly and easily on ActiveState Perl using Perl Package Manager [ppm]. The command, once ppm is started, is: install Mail::Sendmail and

Re: perl to convert HTML to PDF

2003-02-19 Thread Todd W
"Shaunn Johnson" <[EMAIL PROTECTED]> wrote in message [EMAIL PROTECTED]">news:[EMAIL PROTECTED]... > Howdy: > > Running perl v5.6.0 on RedHat Linux 7.2. > > Is there a perl module that can help me > convert a few thousand html files into PDF > files? > > Currently, I have a program called 'htmldo

RE: perl to convert HTML to PDF

2003-02-19 Thread Dan Muey
Never used them but I know they're there. http://search.cpan.org Select 'modules' and search for 'pdf' I use htmldoc myself and it works fine but I can see what you're saying. The modules I looked at didn't seem to be geared toward taking an html file and turning it into a pdf They seemed more

Re: Accessing arrays of arrays

2003-02-19 Thread Lance
You have to place a REFERENCE to an array into another array: -- @jon = qw/ "jon" "hansfelt" "123-1122" /; @ben = qw/ "ben" "jones" "222-1231" /; @marsha = qw/ "marsha" "padgett" "333-9087" /; @abe = qw/ "abe" "johnson" "421-4623" /; @address = ( \@jon, \@ben, \@marsha, \@abe); -

Re: Sending e-mail from perl script using SMTP on Windows!!!working now

2003-02-19 Thread Steve Lobach
I would assume you would have to actually do a lookup using LDAP or something.. >>> "Madhu Reddy" <[EMAIL PROTECTED]> 02/18/03 08:55PM >>> Hi Guys, now it's working fine there is typeo in e-mail address i put email address as '[EMAIL PROTECTED]' here typeo... actual is "redy.ponnolu"

SSL

2003-02-19 Thread Hytham Shehab
hi guys, If someone want some interaction with the web, he might use LWP and WWW::Mechanize, thats good, but thats not good if he wants to work with SSL. how can i integrate my script with SSL? thx. -- Hytham Shehab -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-ma

RE: Accessing arrays of arrays

2003-02-19 Thread wiggins
On Tue, 18 Feb 2003 09:41:21 -0700 (MST), Rob Trahan <[EMAIL PROTECTED]> wrote: > Hello, > > I was wondering how I would could access arrays of arrays. I would like to > be able to get to (print, for now) the value in each nested array. Here > is

RE: Getting HTML files from remote sites

2003-02-19 Thread Dan Muey
Try LWP::Simple use LWP::Simple; $content = get("http://yahoo.com";); print "Content-type: text/html\n\n"; print $content; Or use HTML::Parser or HTML::TokeParser To get only specific thing from $content. Very smooth once you do it a bit. > -Original Message- > From: dan [mailto:[EMA

Test message plz delet without wasting time reading it

2003-02-19 Thread Crowder, Rod
The information contained in this e-mail is intended only for the individual or entity to whom it is addressed. Its contents (including any attachments) are confidential and may contain privileged information. If you are not an intended recipient you must not use, disclose, disseminate, copy or

Re: Where to I get sendmail for Win98?

2003-02-19 Thread R. Joseph Newton
Rob Richardson wrote: > Greetings! > > The script I am trying to improve uses sendmail. Before I install the > script on its target Unix box, I would like to make sure the sendmail > part of it works. However, I'm working on a Win98 box. Where can I > get a sendmail for this? myPath>ppm ppm> i

Thanks for the array tips

2003-02-19 Thread Rob Trahan
Jeez, you guys are serious about helping folks out!! Thank you all very much. When I have some time tonight I study the examples you provided. Very impressive! Thanks again, Robert -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RV: Newbie question about modules

2003-02-19 Thread Ramón Chávez
I have used and installed Perldiver Just upload and run. Great tool. Thank you very much for the advice. -rm- - Original Message - From: Todd Wade <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Tuesday, February 18, 2003 4:33 AM Subject: Re: Newbie question about modules > > "Rgíón

Chopping strings

2003-02-19 Thread papapep
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 How should I do to split a long string that the only thing I know is that is a multiple of a previous defined number (for example 26). A graphic example: abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqr

sending files from one server to another.

2003-02-19 Thread Mike Blezien
Hello all, been racking my brains on this one. it seems to me I've seen this done before with the LWP module, sending a data or web page from one server to another, but for the life of me, can't seem to come up with anything that looks workable. What I am attempting to accomplish is when a file

RE: Getting HTML files from remote sites

2003-02-19 Thread NYIMI Jose (BMB)
I'd suggest LWP::Simple. http://search.cpan.org/author/GAAS/libwww-perl-5.69/lib/LWP/Simple.pm HTH, José > -Original Message- > From: dan [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, February 19, 2003 8:38 PM > To: [EMAIL PROTECTED] > Subject: Getting HTML files from remote sites > >

Complaint from 'use strict' about bareword;

2003-02-19 Thread Gan Uesli Starling
I get this complaint from 'use strict'; > Bareword "ckKeyBts" not allowed while "strict subs" > in use at gus_perl/FYBB_DirTree.pm line 425. I know what it means. I have a sub which is defined later in the script than it is called on line 425. After I put an ampersand onto &ckKeyBts at line 425

Win32::AdminMisc::GetFileInfo($filename, \%Attribute)

2003-02-19 Thread Zeno Jauch
Hi , Win32::AdminMisc::GetFileInfo($filename, \%Attribute) is delivering different hashes for *.exe and *.dll files. Why? How can I access version infos and build numbers of application extension files? Thanks in advance. Zeno

Re: Where to I get sendmail for Win98?

2003-02-19 Thread Steve Maroney
Is there a Sendmail port to Winblows ? I dont think there is . Thank you, Steve Maroney On Tue, 18 Feb 2003, Rob Richardson wrote: > Greetings! > > The script I am trying to improve uses sendmail. Before I install the > script on its target Unix box, I would like to make sure the sendmail >

Re: local() on elements of lexical aggregates??? [OT]

2003-02-19 Thread David Zhuo
On Wednesday 19 February 2003 08:16, Paul wrote: > > Er? Sorry, I don't mean for this to sound as bad as it does, but > have you read the docs that *come* with Perl i will let you take a guess. > > Perhaps a mistaken assumption. Could someone delineate the difference > between package va

Reading Tk::Text widget

2003-02-19 Thread Steve Lobach
I am trying to read in a text widget line by line: my $peg1=$PegText->get('1.0', '1.0 lineend'); my $peg2=$PegText->get('2.0', '2.0 lineend'); the problem is I want to do it dynamically, because I don't know how may I will have in the future.. I read about the following method,

Re: local() on elements of lexical aggregates??? [OT]

2003-02-19 Thread Paul
> >> there is no package variables in Perl, only global or lexical. > > > > Not so -- ALL package variables in Perl *are* global, but likewise > > all global variables in Perl are package vars. Even $_ is > > technically $main::_ so that > > > > $_ = 'foo'; > > package bob; > > print $main:

RE: Accessing arrays of arrays

2003-02-19 Thread Paul
--- Timothy Johnson <[EMAIL PROTECTED]> wrote: > For starters, you should get in the habit of adding 'use warnings' > and 'use strict' to the beginning of your scripts. Absolutely. Make them a mantra. Fix code until they are happily silent. THEN all you have to watch out for are the insidious lit

Module usage ?

2003-02-19 Thread km
hi all, i want to know if i 'use somemodule' in a perl program how does it affect the performance (in terms of being fast) of the script ? basically i want to compare the executable speed of the program with and without using the module. thanks, KM -- To unsubscribe, e-mail: [EMAIL PROTECTED]

Re: Accessing arrays of arrays

2003-02-19 Thread John W . Krahn
Rob Trahan wrote: > > Hello, Hello, > I was wondering how I would could access arrays of arrays. I would like to > be able to get to (print, for now) the value in each nested array. Here > is what I've been trying: > > ~~~ > #!/usr/bin/perl > > @jon

Re: Sending e-mail from perl script using SMTP on Windows!!! working now

2003-02-19 Thread R. Joseph Newton
Madhu Reddy wrote: > Hi Guys, >now it's working fine > there is typeo in e-mail address > i put email address as '[EMAIL PROTECTED]' > here typeo... > actual is "redy.ponnolu" Hi Madhu, I am glad that it is now working, but I think you may be working too much here. Check out Mail::

perl to convert HTML to PDF

2003-02-19 Thread Johnson, Shaunn
Howdy: Running perl v5.6.0 on RedHat Linux 7.2. Is there a perl module that can help me convert a few thousand html files into PDF files? Currently, I have a program called 'htmldoc' and I can script it so that I convert the html files into PDF, however, the font size doesn't seem to carry over

Re: clarification of my() with inline if ???

2003-02-19 Thread R. Joseph Newton
david wrote: > let me put it this way. do you know the difference of: > > if(0){ > my $x = 1; > } > > and: > > my $x = 1 if(0); > > if you do, you will know why the second form is what Perl discourages you to > do. if you don't, you probably have the reread the doc again :-) > > david So

RE: How to get 1st line, last line and no of lines in a file

2003-02-19 Thread Paul
> > Subject: How to get 1st line, last line and no of lines in a file > > is there any perl functions available for that ? > > suppose, if file have millions of records, ok If it's a small file, try Tie::File by (I believe) Mark Jason Dominus. It's very cool. For a big file, I'm not sure ther

Re: How to get 1st line, last line and no of lines in a file

2003-02-19 Thread R. Joseph Newton
Madhu Reddy wrote: > Hi, >How to get first line, last line and no of lines in > a file. > > is there any perl functions available for that ? > right now what i am doing is > > open file > while ( > { > $lines++; > } > close(FH) > > This operation is expensive.. > suppose, if file have mil

RE: Where to I get sendmail for Win98?

2003-02-19 Thread Dan Muey
Don't use snedmail use one of the many Mail modules that doesn't rely on external programs. http://search.cpan.org > -Original Message- > From: Rob Richardson [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, February 18, 2003 6:13 PM > To: [EMAIL PROTECTED] > Subject: Where to I get sendma

Getting HTML files from remote sites

2003-02-19 Thread dan
What's a good module to retrieve HTML content from another website? I can't see any obvious names on CPAN, maybe I overlooked something. What I want to do is to retrieve a HTML file off another server, and in my script, look for various pointers in the code to output it to console. I've done this i

RE: Accessing arrays of arrays

2003-02-19 Thread Timothy Johnson
For starters, you should get in the habit of adding 'use warnings' and 'use strict' to the beginning of your scripts. Secondly, it looks like you are trying to use $jon as a reference to @jon, but you never assign it that value. You should probably change @address = qw/ $jon $marsha $ben $ab