Im NMS formmail von sourceforge.net wollte ich einen Text variabel gestalten und habe daher in dem folgenden Codeteil die Zeile (#....) durch die darauf folgende ersetzt.
Ich erhalte dann die Fehlermeldung:
Global symbol "$tDanke" requires explicit package name at (eval 8) line
1342
Als Perl-Anfänger sagt mir die Meldung nichts. Könnt Ihr mir - ohne das gesamte Listing zu kennen, sagen, woran es liegen könnte ?
Hier der Code-Teil:
use vars qw(... $tDanke ....);
...
$tDanke = ".....";
sub success_page_html_preamble {
my ($self, $date) = @_;
# my $title = $self->escape_html( $self->{FormConfig}{'title'} || "Danke für die Nachricht");
my $title = $self->escape_html( $self->{FormConfig}{'title'} || "$tDanke");
my $torecipient = 'to ' . $self->escape_html($self->{FormConfig}{'recipient'});
$torecipient = '' if $self->{Hide_Recipient};
my $attr = $self->body_attributes;
.........