Re: Parsing HTML Form Data in Perl

2002-06-11 Thread Tor Hildrum
> I have written a e-mail script but cannot get the From part of the > sendmail protical to recognize e-mails with a period in the user name > like [EMAIL PROTECTED] It causes errors. I know if I send > brook/.hurd@gm/.com it will work. /. or \.? > I cannot locate the code required to > parse

Re: How do I do this

2002-06-10 Thread Tor Hildrum
> sub settings_smi_edit { > $storeline = $q->param('id'); > > open(FILE, "info/smileset.txt"); > @file = ; > close(FILE); > > foreach $i (@file) { > ($number, $image, $name, $text, $used) = split(/\|/, > $i); > if ($number eq $storeline) { > @numb = ($number, $image, $name, $text, $used); > } >

Passing a param.

2002-04-13 Thread Tor Hildrum
Hi, I have the following script: First page asks for course(chosen from an array). print p("Velg arrangement: ", popup_menu("arrangement", \@arrangement)); When this is selected, the user hits a submit button and is taken to the second page. Here it says how many users are all ready signed up fo

Calling a sub with submit-button.

2002-04-07 Thread Tor Hildrum
Here is the code: ..sub velgarrangement{ print start_form(), hr; print p("Velg arrangement: ", popup_menu("arrangement", \@arrangement)); print p(submit("Velg")); print end_form(), hr(); registrer(); } What happens now is that velgarrangement() and registrer() are both printed to the screen at t

Fetching params and joining them to path's.

2002-04-07 Thread Tor Hildrum
I have this obscure problem, that I feel should be really easy to solve. But, I can't figure it out. I've been skimming trough both Learning Perl and Programming Perl, but I suddenly feel blind to the code. Here are some snips from the code: print header(), start_html("Registrering til arrangemen