beginners ?

I am having a problem running scripts on my local computer. I installed Apche and perl but when I call a script from html I get this error: Forbidden You don't have permission to access /C:/Documents and Settings/larry/Desktop/cgi-bin/countdown.pl on this server. my server log shows this:

Brand New Perl Beginner - trouble using activePerl

. Anyway, I do not see the program run. Of course I am doing something very basic wronganyone know what it is??? Thanks !!! -Larry south dakota, US -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

debug problem

borted I tried uninstalling and reinstalling my perl but that had no effect. I have no idea what the problem might be. Larry -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Perl Man Pages

perldoc perldoc perldoc | more Also, if it's activestate, it has an online one if you check your start menu. Also, www.perldoc.com is another online manpage for perl. Larry -Original Message- From: Ray Calkins 100660207 [mailto:[EMAIL PROTECTED]] Sent: Thursday, April 19, 2001 8:

RE: Perl Man Pages

Oops, you don't need the |more (it's a habit from other things) But that will give you all the info you need to learn how to use perldoc. -Original Message----- From: Larry Shatzer [mailto:[EMAIL PROTECTED]] Sent: Thursday, April 19, 2001 8:52 AM To: 'Ray Calkins 100

RE: pulling out part of a /path/to/a/file

I've done this several ways, depending on my mood. 1. @path = split(/\//, $file); $filename = $path[$#path]; 2. $filename = $1 if ($file =~ m|/([^/]+)$|); 3. use File::Basename; $filename = basename($file); 1 uses split and $#array, which can be nasty if someone set $[ to something other tha

AI-Categorize module

I would like to install and test this module on an NT system but I am not having good luck. Any help would be appreciated. LM

RE: On Beginners' Mindsets, Part I

Elaine -HFB- Ashton wrote: > Scott Thompson [[EMAIL PROTECTED]] quoth: > *> > *>While I wholeheartedly agree with the above statement, > might I suggest > *>others not to take this statement TOO literally. For > myself, I have learned > *>just as much about Perl -- sometimes MORE -- by "bu

RE: qw

Here is the documentation on it. ( http://www.perldoc.com/perl5.6/pod/perlop.html#qw%2fSTRING%2f ) qw/STRING/ Evaluates to a list of the words extracted out of STRING, using embedded whitespace as the word delimiters. It can be understood as being roughly equivalent to: split(' ', q/STRING

replacing multiple blank lines with a single blank line

utions but haven't found the correct formulation. surely I am missing something simple here. Larry

Finding missing numbers in sequence

en 70 and 79 million, and join the two tables.) Larry [EMAIL PROTECTED] script: use strict; use warnings; my %seen; my @list = (); my @missing; my @ids = (); my $lis; my $item; foreach $lis (1 .. 10) { # sample list of 10 push(@ids, $lis); } open(DATA, "&l

Confused about supplying command line arguments and using @ARGV

ilehandle INFILE at C:\Perl\my_scripts\argv_test2.pl line 6. Quoting cookies.txt doesn't change the error message. When I push a value onto @ARGV, the script works fine. Any insight will be very appreciated. Larry. argv_test.pl use warnings; #push @ARGV, "cookie.txt&q

RE: Confused about supplying command line arguments and using @ARGV

y' Pinyan [mailto:[EMAIL PROTECTED] Sent: Thursday, June 03, 2004 5:30 AM To: Larry Wissink Cc: [EMAIL PROTECTED] Subject: Re: Confused about supplying command line arguments and using @ARGV On Jun 2, Larry Wissink said: >I want to supply the name of a file on the command line when executing

perl module installation

oading the correct modules to enable the > scripts to run. > > Any suggestions will be appreciated. > > Larry Mullis > Robins Federal Credit Union > Warner Robins, GA -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

RE: perl module installation

your help. Larry Mullis -Original Message- From: Wiggins d Anconia [mailto:[EMAIL PROTECTED] Sent: Friday, June 25, 2004 11:07 AM To: Larry Mullis; [EMAIL PROTECTED] Subject: Re: perl module installation > > > > > I have perl v5.6.0 installed on my AIX web server. I am

using the system command

I am running perl version 5.8.0 on a Sun Solaris 9.0 machine. Given the following bit of code: $SOME_FILE = $_; chomp($SOME_FILE); $SOME_SAFE_FILE = $SOME_FILE . "_lax"; system ("cp '$SOME_FILE' '$SOME_SAFE_FILE'"); open (IN_FILE, "$SOME_FILE" ); open (TMP_OUT_

RE: using the system command

> > I am running perl version 5.8.0 on a Sun Solaris 9.0 machine. > > Given the following bit of code: > use strict; use warnings; > $SOME_FILE = $_; > chomp($SOME_FILE); > $SOME_SAFE_FILE = $SOME_FILE . "_lax"; > system ("cp '$SOME_FILE' '$SOME_SAFE_FILE'"); This is

RE: using the system command

eared identical. Anyways, I did listen to the advice I was given and removed the system command. I am now using file::copy, copy(), and move() functions. Thanks for the help. > -Original Message- > From: Adamiec, Larry > Sent: Thursday, July 01, 2004 13:35 > To: '[EMAIL

form content passing

Hello, I am having troubles getting started. I have a Unix (Solaris 9) cgi script which parses a form, processes the contents of the form, and then sends it to a Windows ASP script for more processing and insertion into a Access database. I haven't been able to determine the correct or most effi

RE: form content passing

t; > my $req = POST 'http://some_server/test2.asp', > > [ hidden_1 => 'XXaaXX', > > hidden_2 => $in{'hidden_2'} > > ]; > > my $content = $ua->request($req)->as_string; > > see > perldoc LWP::UserAg

cgi scripts

Hello, I am trying to send form data via a UNIX CGI Perl script to a MS Access database. The form and the CGI script are both on a secure web server. The unix script must be used to process the credit card information from the form. I intend to use the POST method of sending the form data to the

form posting

Windows ASP script is here: <% Dim objConn Set objConn=Server.CreateObject("ADODB.Connection") objConn.ConnectionString = "DSN=;password=;" objConn.open sql = "insert into testtable(testfield1, testfield2) values ('" &_ request.form("email") &

RE: form posting

> -Original Message- > From: Wiggins d'Anconia [mailto:[EMAIL PROTECTED] > Sent: Monday, October 18, 2004 21:04 > To: Adamiec, Larry > Cc: [EMAIL PROTECTED] > Subject: Re: form posting > > > Adamiec, Larry wrote: > > I am still trying to post form

RE: form posting

> > > > > > > >From what I read, there isn't any operator after POST and > line works > so I believe an operator isn't needed. > > > > Thank you for your help. > > > > Larry > > > > Ah, yep. POST is a method provi

bad name error

quot;\n"; } else { $MESSAGE .= \tScore:"\n"; } $MESSAGE .= "\n"; $MESSAGE .= "Education\n"; What does "Bad name after question_19_date_one' " mean? I went thru the CGI code and the html code and the form names compare OK. Perldoc does not have any entry on this topic unless I am looking for the wrong things. Larry -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

RE: bad name error

x27;; $sym = "mypack::$var"; After reading this, I found the following code at line 346: elsif ($query->param('question_18') eq 'Yes") Note the double quote at the end vs. what should have been a single quote. I chnaged teh double with a single and the synt

syntax differences and performance

ble difference, but I didn't use any sort of debugging/timer tools either. I am debating with myself about which line from the second set I should use. In all instances the correct value of "price" was inserted into the variable $MESSAGE. Larry -- To unsubscribe, e-mail: [EMA

CGI.pm info on the web

This link may be of help to some people. http://www.samag.com/documents/s=9408/ur0411l/ Larry Adamiec -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

reg expression in an if test

an use the modifier 'i' in my search string to ignore case but I must insert an upper case 'L' into the database. Is there a different way to check the last 8 characters and the length of the string than what I am doing? Larry Adamiec Here is the code

FW: reg expression in an if test

> > -Original Message- > > From: JupiterHost.Net [mailto:[EMAIL PROTECTED] > > Sent: Thursday, November 11, 2004 15:17 > > To: [EMAIL PROTECTED] > > Cc: Adamiec, Larry > > Subject: Re: reg expression in an if test > > > > > > > D

RE: Sufficient effort

> -Original Message- > From: Gunnar Hjalmarsson [mailto:[EMAIL PROTECTED] > Sent: Wednesday, December 01, 2004 15:45 > To: [EMAIL PROTECTED] > Subject: Sufficient effort > > > In another thread the list admin, Casey West wrote: > > Gunnar Hjalmarsson wrote: > >> there may or may not be

RE: FTP automatic

> -Original Message- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] > Sent: Friday, December 03, 2004 13:36 > To: [EMAIL PROTECTED] > Subject: FTP automatic > > > HI! > I need to do something to automatize one process. > When a file in directory reach 1 GB I need transfer file

Search a log file and restart an app

I am not a big perl programmer. I wrote a script some time back and now I have to add more to it. What I have to do is this. 1) Stop 2 applications. 2) If they don't stop kill them. 3) Sync up all my web content (I have the script that does all this in place) 4) Clear out application #1 log

RE: Search And Replace

. > > For Example: > > X=G1234V00 > > I want to replace all occurences of 'V' with 'v' in both perl > and korn shell > > William Black In Perl, you can use ucase and lcase. In Korn, you can use tr (see man pages for details) Larry -- To unsubs

Write stdout to a file as well as stdout

I have a script that does all kinds stuff. When its running it outputs all kinds of useful information to the screen and exits. What I want to do is have this also sent to a file. Any thoughts? Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECT

RE: www.perldoc.com

I can ping www.perdoc.com successfully but I can't bring up a web page. I am located in downtown Chicago Larry > -Original Message- > From: Ron Goral [mailto:[EMAIL PROTECTED] > Sent: Monday, February 28, 2005 08:50 > To: Gavin Henry; beginners@perl.

installing DBD::mysql

I am trying to install the mysql drivers using CPAN. I am runnig Solaris 9 on a Sparc server. I entered: perl -MCPAN -e shell then install Bundle::DBD::mysql The final screen and a half of output is here: Checking if your kit is complete... Looks good Using DBI 1.47 (for perl 5.008 on sun4-s

Re: beginner on the windows platform

don't program in a Windows environment, but my copy of ActivePerl has a document which has a section entitled "Getting Started". It has a few examples of how to run perl scripts. You may want to look at that. Larry

Re: Learning Perl books

it out I hadn't heard of it either, but here's what a search yielded http://win32.perl.org/wiki/index.php?title=Strawberry_Perl Larry

Re: Module for printing file with CUPS

dvance Toddy I haven't used it, but there's a module on CPAN called Net::CUPS. Glancing at the methods it provides it looks to me like it may by what you need. http://search.cpan.org/~dhageman/Net-CUPS-0.41/Printer/Printer.pm Larry

Re: what's your most favourite feature of perl?

[EMAIL PROTECTED] wrote: Just a simple survey. As a perl fan, I'd like know what's make you are so enthusiastic with perl. As for me, I vote the smart data structure design:) I'd have to go back to my first experiences with perl to answer that (since then I've found a lot of different adv

reconciling the results from two Perl installations

::DNS' is used (given that 0.61 came out this week and it seems relevant)? kind regards/ldv Larry Vaden Internet Texoma, Inc. [EMAIL PROTECTED] vaden]# spamassassin -t < sample-nonspam.txt > sample-nonspam.out [30457] warn: spf: lookup failed: Net::DNS::typesbyname() argument (SPF)

Re: reconciling the results from two Perl installations

On 8/2/07, Tom Phoenix <[EMAIL PROTECTED]> wrote: > On 8/2/07, Larry Vaden <[EMAIL PROTECTED]> wrote: > > > What controls whether a Perl module is chosen from > > The order of directories in @INC controls this; the first module found > is the one that's

Storing Output file.

Hi Team, could you please let me? i have a file which contains "Debug", i would like to replace debug to "Error", when i ran the below program the out showing Error message but how to save the output with new changes. Could you please tell me how to fix it? open(FILE, "){ print "Before substi

Re: Storing Output file.

6 at 8:29 PM, Logust Yu via beginners < > beginners@perl.org> wrote: > >> You can probably achieve this easily with 'sed' on bash. >> >> On 28 Jan 2016, at 09:37, Frank Larry wrote: >> >> Hi Team, >> >> could you please let me? i have

Re: Storing Output file.

Hi Team, I tried it was working. -Franky On Fri, Jan 29, 2016 at 8:21 AM, Frank Larry wrote: > Thank you so much for the solution you people provided. :) > > Warm Regards, > -Franky > > On Thu, Jan 28, 2016 at 8:49 PM, Malisetti Ram Murthy < > malisettirammur...@g

DBI MYSQL

ED BY '|' LINES TERMINATED BY '\n' }); $sth->execute(); $sth->finish(); $dbh->disconnect(); Any help would be greatly appreciated !!! Larry Sandwick Sarreid, Ltd. Network/System Administrator phone: (252) 291-1414 x223 fax : (252) 237-1592

RE: DBI MYSQL

: Access denied for user: '[EMAIL PROTECTED]' (Using password: YES) I will check in to this, I am sure I am missing a grant somewhere ! Thanks for everybody's help !!! // Larry -Original Message- From: Dan Muey [mailto:[EMAIL PROTECTED] Sent: Wednesday, November 12,

Parsing problem

|O18549|05/20/03|1801 |DESK BOX, VICTORIA|1|1| 85.50 Any suggestions would greatly be appreciated !!! TIA Larry Sandwick Sarreid, Ltd. Network/System Administrator phone: (252) 291-1414 x223 fax : (252) 237-1592

RE: Parsing problem

d yes you said it shoot it, and replace it with ORACLE. :) I thought it would be done with hashes and every time I get into hashes I get a headache. I do see that I have much to learn about Perl especially hashes. TIA // Larry -Original Message- From: drieux [mailto:[EMAIL PROT

Redirect stdout, stderr to file and stdout

I have a small script that does some admin work for me. What I need to do now is not only have is display information to STDERR and STDOUT but also write the same information I see when I run the command to a file. I have written it for others who are not very technical. I want them to be able t

RE: Redirect stdout, stderr to file and stdout

00:00:00 tee YourLogFileHere I have a close (TEE); at the end as well. Any thoughts? Thanks -Original Message- From: Randal L. Schwartz [mailto:[EMAIL PROTECTED] Sent: Saturday, January 17, 2004 9:55 AM To: [EMAIL PROTECTED] Subject: Re: Redirect stdout, stderr to file and stdout

RE: Redirect stdout, stderr to file and stdout

I think I have it. I had to have close (STDERR) close (STDOUT) close (TEE) -Original Message- From: Larry Guest [mailto:[EMAIL PROTECTED] Sent: Saturday, January 17, 2004 11:22 PM To: 'Randal L. Schwartz'; [EMAIL PROTECTED] Subject: RE: Redirect stdout, stderr to file and std

File::Repl help !!

Ok, I have written a script that uses the File::Repl module. I am pretty much done and was just doing some final tests when I realized that the module does not keep the permissions on the files when it replicates them. This is not good since I am using it for web content pushes from staging to p

File::Copy

Anyone know how to get File::Copy module to keep file permissions when it copies from one location to another? Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Date and Time

I am calling rsync from my perl script. When it runs it creates a dir where I want the backups to go. I need this dir to be the current date-time. I can get the format I want like this. my $date = `date +%m-%d-%Y_%H-%M-%S`; Which gives me 01-22-2004_20-04-14 But rsync does not

using substr... is this efficient

/\s+// ; $page =~ s/\s+// ; if ( $page eq "" ) { $page = "" }; print DATA "$item|$ldesc|$page|$d\n"; } close FILE; close DATA; exit; Larry Sandwick Sarreid, Ltd. Network/System Administrator phone: (252) 291-1414 x223 fax : (252) 237-1592

Connecting to a drive

. system "net use m: \\$node\\c\$ user:/username password"; The error I get from the line is a syntax error. If I map the drive manually my script works.(That's no good when you have to do it 40 times ) Any suggestions would be appreciated Thanks for your help!

RE: Connecting to a drive

Thanks for the quick response, using the print command I saw the error of my way !!! I had a space in $node. Thanks again for the help !!! ---Larry -Original Message- From: Jenda Krynicky [mailto:Jenda@;Krynicky.cz] Sent: Monday, November 04, 2002 3:41 PM To: [EMAIL PROTECTED

Re: @array to %hash

ck easy way to do it given @keys (array of keys) and @values (array of values): @hash{@keys} = @values; This will set up the key/value pairs in %hash. ---Larry +----+ | Larry Coffin, G.P.H.

Re: If - Else What?

if ($a == 20) {print "a is equal to 20.\n";} ---Larry +----+ | Larry Coffin, G.P.H. Watertown, MA | | http://w

if statement not validating properly

f statement" is always true and processes the form. Any suggestions would be appreciated. See code below TIA Larry #- if ( $ip == "192.168.100.100" ) { &process_form; } else {

Re: GNU grep -C in Perl

the next line } $last = $line; } That should work unless you want to make sure you never print the same line twice or if you want more than one line of context. ---Larry +----+ | Larry

Re: checksum implementation in perl

don't need to be, you should be all set. ---Larry +----+ | Larry Coffin, G.P.H. Watertown, MA | | http://www.PointInfinity.

Re: get COOKIES with 'HTTP_COOKIE' ??

if that fails, just assuming that HTTP_COOKIE is empty. Did you try simply printing HTTP_COOKIE to see what value it actually has? I don't believe cookies are returned to the server as 'name=erik' and 'value=test_cookie'

read file in from bottom instead of top

I have tried to read a file in backwards in stead of from the top without any success !!! The original code looks like this . open(DATABASE, "

Install a Module ???

quot; . Is there a certain directory is should be in ? Larry Sandwick Sarreid, Ltd. Network Administrator (252) 291-1414 x223

Filling out forms on the web.

ification (or amusement) of others. Again, any insight will be greatly appreciated. Sincerely, Larry Wissink [EMAIL PROTECTED] This script retrieves the login page. I pipe this to a file from the command line: c:\do_get.pl > befree_login.html #perl use strict; use LWP; use HTTP::Cookies; my $

Filling out forms on the web. (completed).

e anyone wanted to see it, here it is. Again, thanks for the suggestions. Larry Wissink. This script retrieves the login page. I pipe this to a file from the command line: c:\do_get.pl > befree_login.html #perl use strict; use LWP; use HTTP::Cookies; my $browser; my $webpage; $webpa

How to replace a literal with a variable

rchInfo[10]; # did I detect any errors or exceptions ($err) = ( $line =~ / ERR (\w+) /i ); if ( $err ne "") { $err =~ tr/A-Z/a-z/; if ($err eq "nlf") { $NLFerr++; } elsif ($err eq "cat") { $CATerr++; } } -Larry -- To unsubscribe,

Re: How to replace a literal with a variable

Here is what I need. I hope this explains it better. I have a script which creates a report for No Listings Found errors. I'd like to adapt it to create a report for any "ERR " code condition in the log. The errors and values are below. TIA! >>>Error | Value<<< city not in state | TSE ZIP not

Re: How to replace a literal with a variable

"-\n\n"; > > foreach(sort keys %errs){ > print "$_.$errs{$_}\n"; > } > > > > That will split each line on a pipe, then remove whitespaces at the > beginning of the variable, then store it as a hash key. > > -Original Mess

how to grab a parameter from command line and do a search and replace in script

"; print STDERR " -p optiontal: specify port number -- if not specified, 80 will be used\n"; print STDERR " -d specify numberic day of month -- e.g. 3\n"; print STDERR " -m specify numberic month -- e.g. 4\n"; print STDERR " -y speci

grab another param from url

+)/i );#gets city parameter (T=) if ($tPara ne "") { $tPara = unpack_clean($tPara); } if ($tPara ne "" && $err eq "cit") { # print "$tPara\n"; if (exists $userCit{$tPara}) { $userCit{$tPara}++; } else { $userCit{$tPara}=1; $countCit++;}

getting rid of box

I have these coming up when creating a report: ma, BC: 1 bost, : 1 Montroyal, QC: 1 waltam, MA: 1 Quebec, QC: 1 booger, MA: 1 Franklinxxx, MA: 1 BOSTI, MA: 1 How do I rid the report of these boxes? -- -Larry -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e

Re: getting rid of box

ntCit++;} } "James Kipp" <[EMAIL PROTECTED]> wrote in message [EMAIL PROTECTED]">news:[EMAIL PROTECTED] ... > well you did not supply much information here, but i have seen those  > before, and it usually a chomp or chop in the right place(s) of the routine > t

Re: getting rid of box

-Original Message- > From: Mark Anderson [mailto:[EMAIL PROTECTED]] > Sent: Friday, August 02, 2002 9:06 AM > To: Larry Steinberg; [EMAIL PROTECTED] > Subject: RE: getting rid of box > > > How are you creating the report? > > If you are using some sort of print statement, w

Re: getting rid of box

Thanks. I'll give it a shot - Monday. 8-) "Janek Schleicher" <[EMAIL PROTECTED]> wrote in message [EMAIL PROTECTED]">news:[EMAIL PROTECTED]... > Larry Steinberg wrote at Fri, 02 Aug 2002 19:12:06 +0200: > > > sub parseUrl { > > There are modules

how to link to libwww-perl-5.65

tools/perl/lib/site_perl TIA -- -Larry -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: how to link to libwww-perl-5.65

I tried that as well as /tools/perl/bin/perl, which is 'which perl'. No go. -Larry -Original Message- From: Gordon Cabaniss [mailto:[EMAIL PROTECTED]] Sent: Wednesday, September 11, 2002 2:16 PM To: Larry Steinberg; [EMAIL PROTECTED] Subject: RE: how to link to libwww-perl-5.

RE: how to link to libwww-perl-5.65

, MD5-2.02 and MIME-Base64-2.12 are also installed as they >are required for libwww-perl-5.65. but I don't know how to connect to it as it is installed on the network, not my machine. -Larry ps. thanks for your help! -Original Message- From: Michael Fowler [mailto:[EMAIL PR

RE: how to link to libwww-perl-5.65

I just figured it out. I have to add the path to LWP to my .tcshrc @INC. What a knucklehead! Thanks. Larry Steinberg [EMAIL PROTECTED] (781) 466-2811 -Original Message- From: Michael Fowler [mailto:[EMAIL PROTECTED]] Sent: Wednesday, September 11, 2002 3:20 PM To: [EMAIL PROTECTED

perl script not run by cron

Hi! I have modified gsmcontrol.pl (yty.net) as contrologo.pl. & I wonder why my script is not run by crontab when it works when I run it by hand. I have a file for the script in /var/gsm/in and when I run contrologo.pl from commandline it sends sms message (logo) using external program (gnokii)

Perl & MySQl query syntax

Hi! What's the right syntax using a variable with Perl & MySQL query? I got an example for PHP: #$exp_time = time()-86400; #$query = "DELETE FROM cl_temp_users WHERE sign_up_date < $exp_time;" ; But with Perl it does not work, like I have tried below. How to put my $sth line with prepare right so

Re: very confused - chdir not working

27; before using the package names: foreach my $pkg (@pkg){ chomp $pkg; my $dir1 = $pkg; ... You might also want to change your die statement to: or die "cannot change to \"$dir3\": $!" to get more informative error messages.

RE: Is this correct? print syntax

is getting tossed and the 'next if (...)' is not dependent on the print statement. ---Larry +----+ | Larry Coffin, G.P.H. Watertown, MA | | http://www.PointInfinity.com/lcoffin/

Re: Is this correct? print syntax

ements are executed conditionally. And I agree with your earlier letter that it is better to break those into two statements and enclose them within an 'if' block -- much cleaner that way. Thanks for clearing that up! ---Larry +-----

Re: Nice

7; for monitoring. And to change it from within a script, see the setpriority command. >From the Prog. Perl book: To "nice" your process down by four units (the same as executing your program with nice(1)), try: setpriority 0

Re: Substring and Sort

may well do). This comes at the expense of having to save the converted filename, so if for some reason you are tight on memory (i.e. 1000s of filenames) and have lots of CPU cycles to spare, then you might not want to save it and do the case conversion in the s

Re: lost - map { "$_:\t$h->{$_}[0]\n"} keys %$h

ement and not the data structures involved) ---Larry +----+ | Larry Coffin, G.P.H. Watertown, MA | | http://www.PointInf

Do not understand Hashes !

ults open(NewMasterList,">>Results.file") || die ("Could not write file $!"); close (DATA); close (NewMasterList); exit; Any help would be greatly appreciated !!! TIA Larry Sandwick Sarreid, Ltd. Network/System Administrator phone: (252) 291-1414 x223 fax : (252) 237-1592

Hashes

I want to thank everybody who helped me with my Hash problems. You guys/gals are GREAT. Again Thanks !!! Larry Sandwick Sarreid, Ltd. Network/System Administrator phone: (252) 291-1414 x223 fax : (252) 237-1592