Fallst du meinst wie ich es versucht habe den Text in das Feld zu bekommen dann so:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
my @h = '';
my $h = '';
sysopen (HTML, "/root/bin/KnowledgeBase/update/$code.html", O_RDONLY, 0600) or die "can not read: $!";
@h = <HTML>;
close (HTML);
foreach $h (@h) {
$browser->form_number(1);
$browser->field('wikitext', $h);
}
$browser->click('do[save]') or die "can not send:\n $!";
}