Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: CGI.pm, combining two strings

by TGI (Parson)
on May 07, 2001 at 23:45 UTC ( #78621=note: print w/replies, xml ) Need Help??


in reply to CGI.pm, combining two strings

You seem to be a bit confused about how all the parts fit together. Your code is really CGI.pm perl pidgin HTML.

The plain old HTML would look something more like:

<FORM METHOD="POST" ACTION="foo.cgi"> <INPUT TYPE="text" NAME="foo"><P> <INPUT TYPE="text" NAME="bar"> <INPUT TYPE="submit"> </FORM>

The HTML could either be generated by a script or reside in a static file somwhere.

Here's some code that prints a form and any results of previous submits. I didn't list a form action, becuase it defaults to the page it reside in.

#!perl use CGI; use strict; my $q = new CGI; print $q->header(), $q->start_html(), $q->h1('Print some input.'), $q->startform(), $q->textfield('foo'), $q->p(), $q->textfield('bar'), $q->submit(), $q->endform(); # Print w/ space print $q->param('foo').' '.$q->param('bar'); # You can't use "" to in +terpolate param(), it's a function call, not a variable. print $q->p(); # Print w/o space print $q->param('foo').$q->param('bar'); print $q->end_html;


TGI says moo

Replies are listed 'Best First'.
Re: Re: CGI.pm, combining two strings
by stuffy (Monk) on May 07, 2001 at 23:54 UTC
    correct, I posted the part of the cgi that created the html that made the form. it also appears that I can use a comma or a period according to the posts that I have received from others

    Stuffy

      The comma operator (,) acts as a list separator. When you feed print and bunch of stuff with commas in-between you are saying print this list of things. In a scalar context the comma evaluates the left arg and dumps the value, then it evaluates the right arg and returns the result.print scalar('foo','bar','this'); gets you this

      The period (.) is the string concatenation operator. It combines strings. It also wants its operands in scalar context.

      $a = 'abc'; $d = 'def'; $A = $a.$b; #ie, $A='abcdef' print $A.$a.$b;

      This code prints abcdefabcdef. Here I say print this one thing that you can make by putting these things together.

      Though they seem to do much the same thing when you're printing, they are actually quite different. Watch out for the scalars only aspect of .!


      TGI says moo

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://78621]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (6)
As of 2021-12-03 23:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    R or B?



    Results (30 votes). Check out past polls.

    Notices?