Re: [Perl-unix-users] [PMX:#] Prepending

2002-12-15 Thread jna
What I am trying to get it to print is a reference to the one perl example.pl when a != 1 then make it print exactly nc_example.pl when it does = 1. So I have two sets of files say a.pl and nc_a.pl and I would like to use a.pl as default unless a==1 then user the nc_a.pl in others just prepend the

Re: [Perl-unix-users] [PMX:#] Prepending

2002-12-15 Thread jna
I tried that as: Something SOmwhere and it doesnt work when $a == 1 the printed out results is nc_/new.pl?Action=wit ? I also tried Something SOmwhere and for some reason it still print out nc_/new.pl?Action=wit if $a==1 Any ideas? John > > print < > Something > > SOmwhere > > You need to re

[Perl-unix-users] [PMX:#] Prepending

2002-12-15 Thread jna
I am trying to prepend something and ran into an issue.   I am using a snipped like this:   if ($a == 1) { $pre = "nc_"; }   Later on when I try to use this:   print < Something SOmwhere Lots of other html snipped EOM   Now when this prints the link Something will print nc_whoopi.pl?action=""

Re: [Perl-unix-users] Deciding on route by domain

2002-11-21 Thread jna
> [EMAIL PROTECTED] wrote: > > How do you tell the url calling the script? > > > > I want to change some of my programs to respond differently based on domain > > but function the same. For instance, if I have a script running on www.a.com > > www.b.com www.c.com and want it to differentiate by

[Perl-unix-users] Deciding on route by domain

2002-11-21 Thread jna
How do you tell the url calling the script? I want to change some of my programs to respond differently based on domain but function the same. For instance, if I have a script running on www.a.com www.b.com www.c.com and want it to differentiate by saying a certain function would act different bas

Re: [Perl-unix-users] Perl error?

2002-11-18 Thread jna
Ack sorry ok here it goes: [Sun Nov 17 22:36:25 2002] [error] [client X.X.X.X] request failed: erroneous characters after protocol string: GET /cgi-bin/pads/script.pl?action=sendmail&id=ddis31&message=would be interested in getting to know you before a meeting .. chatting online first some... i h

[Perl-unix-users] Perl error?

2002-11-16 Thread jna
I am seeing this in my logfile alot: request failed: erroneous characters after protocol string: GET /cgi-bin/myscript Anyone have any idea what this error means and how to correct it? Thanks, John ___ Perl-Unix-Users mailing list [EMAIL PROTECTED]

[Perl-unix-users] Sorting

2002-10-12 Thread jna
Hello List,   I have a datafile in the simple format of:   |2500|78|Marky| |3200|55|Johnny| |1988|10|Joey|   etc   What I am trying to do is sort my display out so when the datafile is read in and then display to the screen as its read in it will show the entire entry with the largest fir

[Perl-unix-users] Parsing

2002-10-07 Thread jna
Hello,   I have a some data files in different formats that I want to parse into one file under a new standard format.   The different formats are below:   Format 1)     Vanderbilt,MI,9899660005,P,"Vanderbilt1 MI, US","Vanderbilt MI, US",9899660005 Format 2)     Calgary,AB,403-770-4904,N Fo

Re: [Perl-unix-users] [PMX:##] Removeing www?

2002-09-10 Thread jna
Excellent that was it! Is there any docs and this anywhere where I can tally up on filtering data like this etc? Thanks, John > this code-snippet: > --- > > $m = '[EMAIL PROTECTED]'; > $m =~ s/^www\.//i if $m =~ /\@/; > print "$m\n"; > > $m = '[EMA

[Perl-unix-users] [PMX:##] Removeing www?

2002-09-10 Thread jna
I have a perl script that takes a user a password and an email address along with some other information. Problem is I get people created profile accounts with there email address prefixed by www. example: [EMAIL PROTECTED] what I want to do is remove the www. from the rest of the email and prese

Re: [Perl-unix-users] Re: File age

2002-09-05 Thread jna
Ah hah! I removed the file::stat and it worked like a charm! Awesome! Thanks, John > [EMAIL PROTECTED] wrote: > > Using > > > > my $filename = "$test"; > > my $mtime = (stat $filename)[9]; # or ctime is 10 > > my $time = time; # broke time out to print > > my $age = int (($time - $mtime) / 86400

Re: [Perl-unix-users] Re: File age

2002-09-05 Thread jna
Using my $filename = "$test"; my $mtime = (stat $filename)[9]; # or ctime is 10 my $time = time; # broke time out to print my $age = int (($time - $mtime) / 86400); # did int to drop fraction print "time=$time, mtime=$mtime, age=$age\n"; I get the following results: time=1031216545 mtime= age=11

Re: [Perl-unix-users] Re: File age

2002-09-05 Thread jna
Well its not much different than what was posted below, here it is : my $ctime = (stat $test)[10]; # or mtime is 9 my $age = (time - $ctime) / 86400; The file date is Sep 2 07:46 and this code tells me it is 11935.3388425926 days old!? Thanks, John > > Hello, > > Thanks for the code below. W

Re: [Perl-unix-users] Re: File age

2002-09-05 Thread jna
Hello, Thanks for the code below. When I implement this I still get a number like 11935.3388425926 but the file is not 11935 days old its date is Sep 2 07:46 Am I missing something here? BTW I switched to mtime [9] as I want the creation of last modified not accessed. Thanks, John > [EMAIL P

[Perl-unix-users] File age

2002-09-04 Thread jna
Hello, I am looking to find out the age of a file in days, what is the best way to do this using perl and maby file:stat or something? I have tried but get some outrageous number in the millions!? thanks ___ Perl-Unix-Users mailing list [EMAIL PROT

Re: [Perl-unix-users] Erroneous EOF?

2002-08-16 Thread jna
I never knew there was a limit to a size a file could be? What exactly is the maxiumum size limit for a file? Thanks, John > How big is the log file? > Have you exceeded the maximum size limit for a file? ___ Perl-Unix-Users mailing list [EMAIL PROT

[Perl-unix-users] Mail::POP3Client and html email

2002-05-18 Thread jna
Is anyone using the Mail::POP3Client for html emails? I am doing fine if all mail is non html but I can not get html emails to display correctly. Anyhow know a trick for this? Thanks, John ___ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubsc

Re: [Perl-unix-users] CGI.pm and broken cookies part II

2002-05-16 Thread jna
Yes, Actually that was the case for a handful of them. They switched cookies on for my sight and had no problem past that. But that was just a small group, there is still those who are using latest version browsers and tell me they cant get in and they do not have cookie turned off. I even helpe

[Perl-unix-users] CGI.pm and broken cookies part II

2002-05-15 Thread jna
Hello, I wrote to the list awhile back ago about CGI.pm and the cookie function mysteriously working for some and not others. I have a check that checks for a cookie to see if its there if it is not it send the user to a login screen. If it is there it reads the cookie. The login screen of cours

Re: [Perl-unix-users] CGI.pm - Cookies - 50-50!?

2002-04-28 Thread jna
> jna wrote: > > > Hello, > > > > Is anyone using CGI.pm and the built in cookie routine? I just implemented > > it on one of my websites storing username and password and retrieving it for > > user identification. Problem is it works for me and for alot of ot

[Perl-unix-users] CGI.pm - Cookies - 50-50!?

2002-04-27 Thread jna
Hello, Is anyone using CGI.pm and the built in cookie routine? I just implemented it on one of my websites storing username and password and retrieving it for user identification. Problem is it works for me and for alot of other people but there are a large group of people who it is NOT working

Re: [Perl-unix-users] Multiple Invocation Casusing Slow downs

2001-11-06 Thread jna
of cpu time while the other scripts where qued, as the delay would be so much smaller than 20 scripts sharing a very small cpu resource? Any thoughts? John > On Tue, 6 Nov 2001, jna wrote: > > > > > Hello, > > > > I was wondering if anyone knew how to attack t

[Perl-unix-users] Multiple Invocation Casusing Slow downs

2001-11-06 Thread jna
Hello, I was wondering if anyone knew how to attack this? If say this script when i run it via the web as the only one running it - it then executes and displays the required information in 10 seconds. Now if 20 people or even say 10 invoke this perl program via the web at the same time or with

[Perl-unix-users] Freeing Up Memory

2001-09-04 Thread jna
Hi Perl Hacker! I have a set of scripts in use on my system that i would like to start tweaking. They are all hand written and not someone elses work. I would like to start reducing the memory it takes to run the scripts. I want to start implementing undef declarations in the scripts, is there a

[Perl-unix-users] memory hooging via perl???

2001-08-07 Thread jna
Hi list, I have a perl script i wrote, its very simple it lists the content of a file line by line. With only 19 line to readin when i watch the program in top being called from the web it will hog 296 megs of ram for its execution. That is way to much for a script, windows only requires 64megs t