シフト時間計算ツール

リポジトリはこちら

">

Perl文法メモ

標準入力

my $input = <STDIN>;

配列

my @array = (1, 2);
my ($a, $b) = split(/,/, $input);

改行コードを削除

chomp($input);

文字列比較 & ループ抜け

if ($input eq "n") {
    last;
}

標準出力+改行コード

say $input;

所感

python2を書いてる気分になる。

文字列比較の構文が面白い。書きづらいけど味があって良いわ。