sysopen (HTML, "/root/bin/Datei.html", O_RDONLY, 0600) or die "can not read: $!";

while (<HTML>){

chomp;
$h=$_;

$browser->form_number(1);

$browser->field('wikitext', $h);
$browser->submit() or die "can not send:$!";
}
close (HTML);