Thread Vergleiche mit 0, PHP gegen Perl und anderes... (71 answers)
Opened by rosti at 2012-12-29 13:07

GwenDragon
 2012-12-27 13:43
#164453 #164453
User since
2005-01-17
14600 Artikel
Admin1
[Homepage]
user image
Keine Ahnung wo bei dir Perl meckert.

Mein Testcase:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

#!/usr/bin/perl

use 5.008;
use strict;
use warnings;

sub doomsday {
   my $day = shift || 4711;
   if ($day == 42) { # Weltuntergang beim 42. Tag! :P
     return "0 but true"; # Untergang ist wahr, Welt is Null
   }
   else {
         return undef; # false
   }
}

print 
        doomsday(42) # Welt kaputt bei 42?
        ? 'BUMM'
        : 'W3l7 3xist|3rt n0ch';
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View full thread Vergleiche mit 0, PHP gegen Perl und anderes...