Leser: 2
|< 1 2 3 >| | 27 Einträge, 3 Seiten |
1
2
3
4
5
6
7
8
9
...
elsif {
my $ref; # die Zeile wird angemeckert aber funktionieren tut alles
if (
%ab and $FORM{switch} eq 'ab' and $ref = \%ab
or
%ba and $FORM{switch} eq 'ba' and $ref = \%ba
) {
...
1
2
3
4
5
$headline =
$mt{Auftragsteil}
.' '
.werk($werk{$tabnr})
.$FORM{online} ? '' : " ($mt{nicht}$nbsp$mt{online})";
1
2
3
4
5
6
7
{ my %mt = qw/Auftragsteil Auftragsteil nicht nicht online online/;
$headline =
$mt{Auftragsteil}
.' '
.werk($werk{$tabnr})
.$FORM{online} ? '' : " ($mt{nicht}$nbsp$mt{online})";
}
1
2
3
4
5
6
7
8
9
10
<!-- warning: begin of steffenw_code at ... steffenw_script.pl line 1513. -->
* Looking up "Auftragsteil" in HASH(0x208f218)
Automaking "Auftragsteil" into HASH(0x208f218)
<!-- warning: Attempt to free unreferenced scalar: SV 0x21a6044 at ... /Perl/lib/Locale/Maketext.pm line 202. -->
* Looking up "nicht" in HASH(0x208f218)
Automaking "nicht" into HASH(0x208f218)
* Looking up "online" in HASH(0x208f218)
Automaking "online" into HASH(0x208f218)
<!-- warning: Attempt to free unreferenced scalar: SV 0x21acef4 at ... steffenw_script.pl line 1515. -->
<!-- warning: end of steffenw_code at ... steffenw_script.pl line 1515. -->
|< 1 2 3 >| | 27 Einträge, 3 Seiten |