Perl

変数の使用例

変数の定義と表示:

my $名前 = "Bob";
print "こんにちは、$名前 さん！\n";

条件分岐の例

条件分岐:

my $年齢 = 18;
if ($年齢 >= 20) {
    print "成人です。\n";
} else {
    print "未成年です。\n";
}

ループの例

ループ処理:

for (my $i = 1; $i <= 5; $i++) {
    print "カウント: $i\n";
}

サブルーチンの例

サブルーチンの定義と使用:

sub 年齢を出力する {
    my ($年齢) = @_;
    print "年齢は $年齢 歳です。\n";
}

# サブルーチンの呼び出し
年齢を出力する(30);

参考

• https://chatgpt.com/