gopikavi has asked for the wisdom of the Perl Monks concerning the following question:
#!/usr/local/bin/perl use CGI; print "Content-type: text/html\n\n"; print <<"EOF"; <HTML> <HEAD> <TITLE>Sub Version!</TITLE> </HEAD> <BODY> <H1><center>version</center></H1> <center> <table border="2"> <th>serial no</th><th>name</th><th>anagement</th> <tr> <td>1</td> <td>$str</td> <td>g</td> </tr> </table></center></BODY> </HTML> EOF open(file,"csk.access"); @name=grep { $_ =~ m/^\[/} <file>; s/\W//g for @name; $str=join '',@name; print $str,"\n"; close file;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: How to pass my variables into html part using perl cgi?
by marto (Cardinal) on May 09, 2017 at 09:11 UTC | |
|
Re: How to pass my variables into html part using perl cgi?
by Corion (Patriarch) on May 09, 2017 at 09:04 UTC | |
|
Re: How to pass my variables into html part using perl cgi?
by hippo (Archbishop) on May 09, 2017 at 09:25 UTC | |
by Anonymous Monk on May 09, 2017 at 21:48 UTC |