- or download this
my $p_sAction = $oCGI->param( "action" );
$p_sAction = decode( 'UTF-8', $p_sAction );
...
print "<html><head><meta charset=\"UTF-8\"></head>";
print "p_sAction: #" . $p_sAction . "#<br>";
print "1510 --- #$p_sAction# eq #$aText{'1510'}#<br><br>";
- or download this
p_sAction: #Benutzer l�schen#
1510 --- #Benutzer l�schen# eq #Benutzer löschen#
- or download this
my $p_sAction = $oCGI->param( "action" );
$p_sAction = decode( 'UTF-8', $p_sAction );
...
print "p_sAction: #" . $p_sAction . "#<br>";
$aText{'1530'} = decode( 'UTF-8', $aText{'1510'} );
print "1510 --- #$p_sAction# eq #$aText{'1510'}#<br><br>";
- or download this
p_sAction: #Benutzer l�schen#
1510 --- #Benutzer l�schen# eq #Benutzer löschen#
- or download this
my $p_sAction = $oCGI->param( "action" );
$p_sAction = decode( 'UTF-8', $p_sAction );
...
print "Content-type: text/html\n\n";
print "p_sAction: #" . $p_sAction . "#<br>";
print "1510 --- #$p_sAction# eq #$aText{'1510'}#<br><br>";
- or download this
p_sAction: #Benutzer löschen#
1530 --- #Benutzer löschen# eq #Benutzer löschen#
- or download this
my $p_sAction = $oCGI->param( "action" );
$p_sAction = decode( 'UTF-8', $p_sAction );
...
print "p_sAction: #" . $p_sAction . "#<br>";
$aText{'1530'} = decode( 'UTF-8', $aText{'1510'} );
print "1510 --- #$p_sAction# eq #$aText{'1510'}#<br><br>";
- or download this
p_sAction: #Benutzer löschen#
1530 --- #Benutzer löschen# eq #Benutzer löschen#
- or download this
if ( $p_sAction eq "Benutzer löschen" ){
print "HELLO WORLD 22222 - Benutzer löschen<br>";
}