Hallo,
ich möchte aus einen file werte auslesen und diese dann auf einer web seite darstellen und unter jeden wert einen button erzeugen.
Beim drücken des buttons wird ein anderes perl script aufgerufen und eine aktion durchgeführt.
Mein Problem nun ist das ich dem button (cgi) keine varible von perl mitgeben kann.
Der rest klappt ohne probleme.
snipet
$cgi->h2('<input type="hidden" name="ip" value=ip '),
dem Wert value will ich eine variable übergeben und das klappt nicht
setzt man den wert value="test" funktioniert der rest.
$cgi->h2('<input type="Submit" name="ip" value="Start">'),
<<<
Komplett code:
#!/usr/bin/perl -w
##load modules##
use CGI;
use CGI::Carp qw(fatalsToBrowser);
##hostfile##
$host="/var/www/hosts";
##open file##
open FILE, $host or die "Could not open $host: $!";
##output html##
my $cgi = new CGI;
print $cgi->header(),
$cgi->h4('<br>'),
$cgi->h2('<center>Power down single Server</center>'),
$cgi->h2('<hr colour="black"'),
$cgi->h4('<br>'),
$cgi->start_html(),
$cgi->end_html();
##read host ips from file##
while (my $line = <FILE>)
{
chomp($line);
if ($line !~/^#/){
($ip, $name)=split(/\s+/,$line);
##output html##
print $cgi->h2($ip,$name),
$cgi->start_html(),
$cgi->h2('<form name="Formular" action="power_down_single_go.pl" method="get" onsubmit="return chkFormular()">'),
$cgi->h2('<input type="hidden" name="ip" value=ip '),
hier ist mein problem dem feld value müste die variable $ip übergeben werden. Das Klappt aber irendwie nicht.Setzt man den wert von value händisch klappt der rest####
$cgi->h2('<input type="Submit" name="ip" value="Start">'),
$cgi->h2('</form>'),
$cgi->end_html();
} ##endif
} ##endwhile
close FILE;
exit(1);
Goole hat mich nicht weitergebracht.
Hat jemand da eine idee