摘要：
$y){ $max = $x; }else { $max = $y; } $count = $result = 1; while($count 1, "second" => 2, "third" => 3); $mapping["first"] = 0; unset($mapping); // destory a whole array $planets = array( "Mecury" => array("dist" => 0.39, "dia" 阅读全文
摘要：
#!/usr/bin/perluse 5.010use warnings# std outprint "hello world\n";# variable interpolation$meal="steak";$barney="fred ate a $meal";$barney='fred ate a '.$meal;# std in$line=;# chompchomp($line=);chomp(@lines=);# defined$madonna=;if (defined($madonna)) {print &q 阅读全文