pass id with perl cgi

garochi has asked for the wisdom of the Perl Monks concerning the following question:

Hi, Im new to perl and will be grateful if you can give me a hand. I have several pictures each with an id, if the users clicks the picture i want the id to be passed to the next page and be added to a url in this new page. How do you say "when user clicks on pic1 pass id1 to page2 and add it to url"? Thanks

Originally posted as a Categorized Question.

Comment on pass id with perl cgi

Replies are listed 'Best First'.
Re: pass id with perl cgi by blaze (Friar) on Sep 02, 2002 at 18:45 UTC
let me make sure im understanding, you have a picture on page 1 with an id of, say, MyID...when someone clicks on the picture you want to add MyID to the url that is somewhere on page2? Well lets say the code for the picture in page one is `<a href="page2.cgi?id=MyID"><img src="image.jpg"></a>` [download] all you'd have to do is get the query string, store it in a scallar(optional) and you could do anything you want with it `#!/usr/bin/perl -w use CGI qw/:standard/; use strict; print "Content-type:text/html\n\n"; my $picid = param('id'); my $url = 'http://www.nextpage.com'; my $newurl = "$url/$picid";` [download] Using the link i made above this little snip would make a new url http://www.nextpage.com/MyID hth Originally posted as a Categorized Answer.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: pass id with perl cgi
by blaze (Friar) on Sep 02, 2002 at 18:45 UTC

<a href="page2.cgi?id=MyID"><img src="image.jpg"></a>
[download]

#!/usr/bin/perl -w
use CGI qw/:standard/;
use strict;

print "Content-type:text/html\n\n";

my $picid = param('id');
my $url = 'http://www.nextpage.com';

my $newurl = "$url/$picid";
[download]

Originally posted as a Categorized Answer.

[reply]
[d/l]
[select]