まずはこんなところから…
# コメント文字 print "はじめてのPerlスクリプトです \n"; # ここにコメントも入れられる
つづいて値を直接入れての計算
print "加算：1+2=", 1+2, "\n"; print "減算：3-4=", 3-4, "\n"; print "乗算：5*6=", 5*6, "\n"; print "除算：7/8=", 7/8, "\n"; print "括弧付き計算：(10+4)*2/4+(5-2)=", (10+4)*2/4+(5-2), "\n"; print "べき乗：4**3=", 4**3, "\n";
つづいて配列
@member = ("のび太","スネ夫","ジャイアン","ドラえもん","しずかちゃん");
print "メンバー全員：", @member, "\n"; #全部結合しちゃうのよ
print "メンバー全員：@member\n"; #望ましい
print "１人目： $member[0]\n";
print "２人目： $member[1]\n";
print "３人目： $member[2]\n";
print "４人目： $member[3]\n";
print "５人目： $member[4]\n";
最後に簡単な変数
$price_A = 200; #商品Aの価格 $price_B = 300; #商品Bの価格 $price_C = 1000; #商品Cの価格 $tax = 1.05; #消費税(5%) #合計金額の計算 $sum = ($price_A + $price_B + $price_C) * $tax; print "計算式：($price_A + $price_B + $price_C) * $tax \n"; #結果出力 print "合計金額：", $sum, "円\n";
今日はこのへんまででおしまい。
