2015-04-18から1日間の記事一覧
#!/usr/bin/perl use strict; use warnings; use 5.010; { # 三項演算子 my $true = !! 1; my $false = !! 0; my $result = $true ? "first" : "second"; say $result; # first } { # 三項演算子の組み合わせ my $size = 15; my $result = ($size < 10) ? "s…
#!/usr/bin/perl use strict; use warnings; use 5.010; { # 三項演算子 my $true = !! 1; my $false = !! 0; my $result = $true ? "first" : "second"; say $result; # first } { # 三項演算子の組み合わせ my $size = 15; my $result = ($size < 10) ? "s…
