Re: hash hanging up browser

Bill, Thank you so, so much --> Your corrections/advice/help not only helps me this time but also will help me to code/think more clearly in the future. --Teresa At 10:16 AM 3/22/2004, you wrote: Your code has logic/implementation design errors; see below - snipped HTH/Bill -- _Sx_ http://youv

hash hanging up browser

Hi, The following code is hanging up the browser and I think it has something to do with the hash having keys array and values array. There is no error message, just the browser taking a really long time. Any help would be appreciated. Works fine with 3 line, 12 word 1 kb text file but not with

Re: PERL IDE

I don't know about firebird database but a really good text editor for web and perl development for Mac is BBEdit offered by http://www.barebones.com The MacPerl integration with syntax check is awesome. Alo has incredible grep functionality. OptiPerl IDE is good for Windows again I don't know

Re: Perl Script to detect a file upload

Hi Ash, You can put log entry code into your file upload script and email code to notify you -- or write separate modules that your upload script calls thru use or require. If you mean that people are uploading onto your server without your upload script, then I don't know what you should do but

Re: running CGI locally??

Just wondering what URLs you might have for these: There are web servers written in Perl alsoo =) --Teresa -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: running CGI locally??

Hi, I think what you are trying to do is imminently accomplishable with Perl if you are putting the interface on the web. With that being said, would you be sending this program to others or would they access a website to find the information? I don't how to write standalone Perl applications bu

Re: MySQL beginner's script

I finally got the database connected but it won't create the table for me. Can we only create tables at the command line? $sth = $dbh->prepare (CREATE TABLE test (first_field CHAR(10), second_field INT)) or print "Can't create table: " . DBI->errstr; $sth -> execute($test) or print "Can'

MySQL beginner's script

Hello, I was wondering if anyone could help me solve this problem. The script appears not to be connecting to the database. This script prints "Here we go" but never prints "Database connected". I used the format that the hosting company supplied. "DBI:mysql:$database:localhost","$username","$

Re: SPLIT - What is it?

take like a text file or something and separate it out? > >Thanks >Mike > > > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --- - Teresa Raymond - - Mariposa Net

logout

Thank you! $company Home Page Log into Apartment/Restaurant/User Info Databases PrintTag exit(0); } else {print "Location:http://traymond.hypermart.net\n\n";; exit(0); } -- ------- - Teresa Raymond - - Mariposa Net

$_ and while stmt

t;Error location is required\n"; } } -- ------- - Teresa Raymond - - Mariposa Net - - http://www.mariposanet.com - --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: log-in/out w/o cookies

You're right, I didn't test before I posted. >"Teresa Raymond" <[EMAIL PROTECTED]> wrote in message >news:p05100301b8de2cf961a1@[67.36.181.234]... >> What I've done is: >> >> 1) have login page w/ hidden input name="formname"

Re: Counting the number of form fields returned with information

< 10; > >would work, but it doesn't seem to work correctly. > >-- >Eric P. >Los Gatos, CA > > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --- - Teresa Raymon

Re: log-in/out w/o cookies

t;all others exclusively for this user account are visible only this >user (except those pages appropriate to this user's group). >4. (from any of this user's pages) Log-out by clicking "log-out" link. >5. Logged-out users sent to some public "thank you/fa

Re: POSTing to a .html URL

to a ".html" file is not >> your largest problem. >> >> I notice that you're including the output of a Perl script in your HTML, but >> that makes no difference. It's still HTML, it's just being parsed for SSI. >> Since the static HTML in your example is so minimal, why not just add a few > > extra 'print's so your script and point the form to it? >> >> hth, >> -- >> Michael >> >> > > > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --- - Teresa Raymond - - Mariposa Net - - http://www.mariposanet.com - --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Help with an error (CGI::use_named_parameters(1);

>Stephen Little > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --- - Teresa Raymond - - Mariposa Net - - http://www.mariposanet.com - --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: script was working now doesn't

the code to have a clue - maybe other list subscribers >are lacking the information required to help. >Dave > >"Teresa Raymond" <[EMAIL PROTECTED]> wrote in message >news:<p0510030bb8bd4f4fb8b3@[67.36.188.151]>... >> The following script was working last n

Re: existing username

bpage. >-- >Matthew Harrison >Internet/Network Services Administrator >Peanut-Butter Cheesecake Hosting Services >Genstate >www.peanutbuttercheesecake.co.uk > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --

Anyone? script was working now doesn't

ED]> >Delivered-To: mailing list [EMAIL PROTECTED] >X-Sender: [EMAIL PROTECTED]@mail.portland.co.uk >Date: Tue, 19 Mar 2002 14:30:41 -0600 >To: [EMAIL PROTECTED] >From: Teresa Raymond <[EMAIL PROTECTED]> >Subject: script was working now doesn't > >The following script

script was working now doesn't

re forbidden to run this program without filling out the form. http://www.mariposanet.com/contactnn.html";>Contact Form PrintTag exit(0); } -- --- - Teresa Raymond - - Mariposa Net - - http://www.mariposanet.com - ---

Re: Fwd: Re: survey to excel

about csv dumps and ascii imports and >such. plus you'd get the speed and power of a real db. > > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- --- - Teresa Raymond

Fwd: Re: survey to excel

>Delivered-To: [EMAIL PROTECTED] >X-Sender: [EMAIL PROTECTED]@mail.portland.co.uk >Date: Fri, 8 Mar 2002 17:15:04 -0600 >To: Teresa Raymond <[EMAIL PROTECTED]> >From: Teresa Raymond <[EMAIL PROTECTED]> >Subject: Re: survey to excel > >I have only worked

survey to excel

I was wondering where I could get step by step very beginning info to transfer web survey information to excel. I have a mac OS 9.2.1 but I think I can translate, I'm not sure what server I'd be working on, I have experience with Unix. -- --- - Tere

Fwd: Re: small projects

here any books/tutorials/web sites where >>I can find small projects, so that I can try these exercises ? >>Kamali >> >> >>-- >>To unsubscribe, e-mail: [EMAIL PROTECTED] >>For additional commands, e-mail: [EMAIL PROTECTED] > > >-- >--

Re: How can i put the html code in my cgi?!?

with the new module CGI.pm , anyone >knows that?!? > >thanx > >Derya Sezen > > > -- --- - Teresa Raymond - - Mariposa Net - - http://www.mariposanet.com - --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Fwd: Re: How to ck for null set w/ Checkboxes

d I believe to be correct, is that, if a CGI param has not >>been given a value, its name will not appear in $q->param(). You therefore >>need a local list of CGI param names in order to check whether they are >>expected, but have not been given a value. >> >>Regards >>- Roger

Re: How to ck for null set w/ Checkboxes

local list of CGI param names in order to check whether they are >expected, but have not been given a value. > >Regards >- Roger - > >- Original Message - >From: "Teresa Raymond" <[EMAIL PROTECTED]> >To: <[EMAIL PROTECTED]> >Sent: Tuesday, Septem

How to ck for null set w/ Checkboxes

tton on your browser and try again. PrintTag exit(0); } } --- - Teresa Raymond - - [EMAIL PROTECTED] - - http://www.mariposanet.com - --- -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Volunteer Project

Is anyone interested in doing a volunteer project for www.selfhelpmagazine.com with me? This is a project that involves a SQL database which I have zero experience with but have bought the Programming the Perl DBI book. --- - Teresa Raymond

Re: Checkbox values and regex

>text-align: center >} >H1 { >font-size: 14pt >} >--> > > > > >Alert! >I'm sorry but only letters, numbers, underscores, >@, hyphens, commas, single apostrophes, and periods. are >allowed in your form fields. >Please hit the back button of your

Checkbox values and regex

@, hyphens, commas, single apostrophes, and periods. are allowed in your form fields. Please hit the back button of your browser and try again. PrintTag exit(0); } } } ------- - Teresa Raymond - - [EMAIL PROTEC

Re: SMTP

take results and e-mail pretty >html page to my friend Kathy. I don't know how to put who the form was >from. I don't know the sender. E-mail message leaves a blank. >Helen > > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail

Re: CGI Email don't work

r clicking on this button. >Could anybody help me please. > >Thank You > >kahine > >_ >Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp > > >-- >To unsubscribe, e-mail: [E

Re: Calling subs

?) >syntax error at mailer2.pl line 14, near "elsif" >Execution of mailer2.pl aborted due to compilation errors. > >Thanks for any help. > > Adam Carson >MIS Department >

Re: Run a CGI Script on OS X w/o...

D] >For additional commands, e-mail: [EMAIL PROTECTED] *Teresa Raymond *Mariposa Net *http://www.mariposanet.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: qq{} vs <

>EndOfHtml > >when writing cgi? To this newbie they seem the same. They both >interpolate. I believe the literal is expressed as print q{content}; *Teresa Raymond *Mariposa Net *http://www.mariposanet.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Multiple values and regex issue

e ... There is a discussing >in the doc for CGI about this ... > > >Hope this helps ... > >jwm > >PS ... > >foreach (keys %params) > { > print "error msg" if ($params{$_} !~ /^([\w\s\.\/-]+)$/i); > } > >I forget about "$_&

Re: A better way for ugly code?

Curtis, What part of the code that you posted actually does the untainting? >--- Mark Ross <[EMAIL PROTECTED]> wrote: > > Hi all, > > > > I'm curious how I can condense this code. I'm pulling > > my values from a Web submitted form (using CGI), and I > > need to untaint them. > > > > But, each f

Re: Form data validation CGI / Perl / MS-FrontPage web page

eturn to a calling page on the site, if possible. > >And finally, am I actually headed in the right direction with all of this? >Yup, I know, "TMTOWTDI" -- that's what makes it fun, of course, but I'm in >the learning stage, so I need to know at least one or two decent

Re: Hyperlink to act like submit button...

;Daniel Falkenberg > >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

a problem with Image::Size

->param('lastname'); my $file=$q->param('file'); my $filepath="/www/chicagoweeklynews"; use Image::Size qw{ imgsize }; my ($x, $y, $id) = imgsize($file); # CAUSES INTERNAL SERVER ERROR print "Content-type: text/html \n\n"; print "Made It!"; exit(0); *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

Re: using mime lite

Dear fliptop: Yes sir! That is exactly what I want to do. >Teresa Raymond wrote: >> >> OK, I am a relative novice to Programming, Perl, CGI, CGI.pm and >> MIME::Lite. As suggested by others on this list I'm using MIME::Lite. >> I've written the below c

using mime lite

=> "$subject", Type => 'TEXT', Data => "$message"); $msg->attach( Path => "$file", Filename => "$file"

email attachment

x27;Upload_Succes'}, $_); } } #ENCODING if ( $filename =~ /\.gif$/i ) { $content_type = "image/gif; name=\"$filename\"; x-mac-type=\"47494666\"; x-mac-creator=\"4A565752\""; $encoding = "base64"; } elsif ( $filename =~ /\.jp

accessing file per CGI.pm

my %params=$q -> Vars; 8. my $filename=$q -> upload('ad'); 9. while (<$filename>) 10. {print; 11. } *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

MIME::Lite

a server 500 error. #ORIGINALLY SAID if (@params) {require MIME::Lite; #DOES NOT WORK: if (@params) {require /www/host/cgi-bin/Lite.pm; #DOES NOT WORK: if (@params) {require ('/www/host/cgi-bin/Lite.pm'); *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

Re: testing for max size of file

How do I access the file size without making filesize a parameter input by the user? >Teresa Raymond wrote: >: This does not work, there is no error msg, it just doesn't get paid >: attention to. >: >: if ($cgi->param('$filesize')>=$CGI::POST_MAX) >: {

formatting and writing to file

) or error( $cgi->p( "No file uploaded." ) ); my $format = $cgi->uploadInfo( $file )->{ 'Content-Type' }; open (TEMP, ">>$tmpdir/tmpfile.fil") or die "Can't find tmpfile.fil"; print TEMP "$format \n"; print TEMP "$file \n"; close(TEMP); *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

testing for max size of file

This does not work, there is no error msg, it just doesn't get paid attention to. if ($cgi->param('$filesize')>=$CGI::POST_MAX) { print "Your file is too large to send"; } *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

Re: email attachment

::POST_MAX = 1_048_576; # 1 MEG FILE SIZE LIMIT > >ReadParse(); > >print header; > >my $cgi = CGI->new; >my $file = $cgi->upload( "ad" ) or error( $cgi->p( "No file uploaded." ) ); >my $format = $cgi->uploadInfo( $file )->{ 'Content-Type' }; > >foreach my $i (keys%in) >{print "$i\n"; >} > >#END PROGRAM > > >*** Teresa Raymond >*** http://www.mariposanet.com >*** [EMAIL PROTECTED] *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

email attachment

7;Content-Type' }; foreach my $i (keys%in) {print "$i\n"; } #END PROGRAM *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

browser attachment

delete the tempfile. Any and all advice is welcome, including what book, where in perldoc, etc... *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

CGI.pm install

cause it needs to be installed? (Well, I tried this as well and no go.) Install CGI.pm without privileges per CGIpm.html by L.Stein: % perl Makefile.PL INSTALLDIRS=site INSTALLSITELIB=/home/your/private/dir % make % make install *** Teresa Raymond *** http://www.mariposanet.com *** [EMAIL PROTECTED]

More "Succintification"

($garage=~/$in{'garage'}/ig || $in{'garage'} eq "Doesn't Matter" || ($in{'garage'}=~/yes/ig && $garage=~/Some Units/ig))) {$match="yes"; print "\n"; print "Result: ", $apartment++, "\n"; print "$aptname$address$city $zip$phoneContact UsRent: $rentmin to $rentmaxBedrooms: $bedrooms\n"; print "\n"; print "Pets: $pets Laundry: $laundry Garage: $garage\n"; print "\n"; print "Hyde Park Location: $location\n"; print ""; print "Comments:$comment\n"; print "\n"; } } print "\n"; -Teresa Raymond http://www.mariposanet.com [EMAIL PROTECTED]

Succinct Code

=~/yes/ig) {print <<"PrintTag"; Yes PrintTag } else {print <<"PrintTag"; Yes PrintTag } if ($laundry=~/Some Units/ig) {print <<"PrintTag"; Some Units PrintTag } else {print <<"PrintTag"; Some Units PrintTag } if ($laundry=~/no/ig) {print <<"PrintTag"; No PrintTag } else {print <<"PrintTag"; No PrintTag } print <<"PrintTag"; Carport/Garage: PrintTag if ($garage=~/yes/ig) {print <<"PrintTag"; Yes PrintTag } else {print <<"PrintTag"; Yes PrintTag } if ($garage=~/Some Units/ig) {print <<"PrintTag"; Some Units PrintTag } else {print <<"PrintTag"; Some Units PrintTag } if ($garage=~/no/ig) {print <<"PrintTag"; No PrintTag } else {print <<"PrintTag"; No PrintTag } print <<"PrintTag"; Comments: $comment Limited Access Database, Authorization Required. PrintTag exit(0); } } -Teresa Raymond http://www.mariposanet.com [EMAIL PROTECTED]

Succinct Code, Use of my $var and global vs local

To: beginnerperl.org From: Teresa Raymond <[EMAIL PROTECTED]> Subject: Succinct Code, Use of my $var and global vs local Cc: Bcc: X-Attachments: This snippet of code works as it is but I was wondering if there was a way to rewrite it more succinctly. I am also not using my $var="&q

Bulletin Board

pass a variable from an html page that isn't used with a form with input fields. Or do I make it a form. In which case my question is how do I make a link into a submit feature passing the message subject as a variable. Thanks in advance. -Teresa Raymond http://www.mariposanet.com [EMAIL PROTECTED]