Einfachste Eingabeaufforderung

[Bugster]

Hatte an so etwas gedacht (einfache Hilfroutinen für mich selbst):

  
#!/usr/bin/perl -w  
use strict;  
  
use CGI qw(header);  
print header(-type=>'text/html; charset=ISO-8859-1');  
  
print "Gib Zahl ein";  
my $inp = <STDIN>;  
chomp $inp;  
  
my $erg;  
# Mach etwas mit $imp, Ergebnis ist $erg  
  
print "Ergebnis: $erg";  
  

Bugster