Hejsan!
Har lagt in en subrutin längst ned i en cgi-fil. Subrutinen är en kort kod som skriver ut innehåller i en textfil, och ser ut enligt nedan.
Om jag vill öppna denna subrutin i en webläsare, hur ser då URL-en ut?
Har provat med att lägga ex. scriptet.pl?utskrift. Har även kikat på andra skript och sett hur de gjort, men inte fått det att fungera.
Tycker att man borde kunna anropa en kortare subrutin via en webläsare, istället för att göra ytterliggare en cgi-fil.
Mvh,
Demo
=====================================
sub utskrift{
$k=0;
open (MOTIV,"gast.txt");
while ($rad=<MOTIV> ){
$k++;
$rad=~/(.*): :(.*): :(.*): :(.*): :(.*): :(.*)/;
$text1[$k]=$1;
$text2[$k]=$2;
$text3[$k]=$3;
$text4[$k]=$4;
$text5[$k]=$5;
$text6[$k]=$6;
}
close (MOTIV);
print "Content-type: text/html\n\n";
print "<body bgcolor=\"#cccc99\" text=\"#333300\">";
print "<center><p><b>Gästlista:</B>";
print "<table border=\"0\" width=\"220\">";
print "<small>";
while ($k ne 0){
print "<HR>";
if($text3[$k] ne "ej ifyllt")
{
print "<b><a href=\"mailto:$text3[$k]}\">$text2[$k]</A></b> <small><i>($text1[$k])</I><br>\n";
}
else
{
print "<b>$text2[$k]</b> <small>($text1[$k])<br>\n";
}
print "$text5[$k]<br>";
print "$text4[$k]</b><p>";
print "$text6[$k]</small><br>";
$k--;
}