2014年2月20日木曜日

開発環境

初めてのPerl 第6版 (Randal L. Schwartz (著)、brian d foy (著)、Tom Phoenix (著)、近藤 嘉雪 (翻訳)、オライリージャパン)、2章(スカラーデータ)の2.12(練習問題)4を解いてみる。

その他参考書籍

4.

コード(BBEdit, Emacs)

sample.pl

#!/usr/bin/env perl
# use diagnostics;
use strict;
use warnings;
use 5.016;
use utf8;
binmode STDIN, ':utf8';
binmode STDOUT, ':utf8';
binmode STDERR, ':utf8';

say "数値を2つ入力";
print "1つ目: ";
chomp( my $x = <STDIN>);
print "2つ目: ";
chomp( my $y = <STDIN>);

say "$x × $y = " . $x * $y;

入出力結果(Terminal)

$ ./sample.pl
数値を2つ入力
1つ目: 5
2つ目: 10
5 × 10 = 50
$ ./sample.pl
数値を2つ入力
1つ目: 10
2つ目: -5
10 × -5 = -50
$

0 コメント:

コメントを投稿