# get_ex1.pl # innihald fyrirspurnar sent til baka į vefsķšu $fyrirspurn = $ENV{'QUERY_STRING'}; ($heiti,$gildi) = split('=', $fyrirspurn); @ord = split('\+', $gildi); $fjoldi=@ord; print "Content-type: text/html\n"; print "MIME-version: 1.0\n\n"; print "<HTML><BODY>"; print "Heiti innslįttarsvęšisins er: $heiti<br>"; print "Url-kóšaš innihald žess er: $gildi<br>"; print "og fjöldi oršanna žar er: $fjoldi"; print "</PRE></BODY></HTML>";