hshiori https://blog.hatena.ne.jp/hshiori/ 猿から人へ https://shiori.hatenablog.jp/ 乱数を生成し、それをユーザーに当ててもらうプログラムです。exit、quit、空白の入力があった際と、数字が当たった際にプログラムを終了させています。 #!/usr/bin/perl use strict; use warnings; use 5.010; #ランダムな数値を生成。 my $random = int(1 + rand 100); while(<>){ if($_ =~ /^\s/ ){ last; }elsif($_ =~ m/exit|quit| /){ last; }elsif($_ == $random){ print "MATCH\n"; last; }elsif($_… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fshiori.hatenablog.jp%2Fentry%2F2014%2F01%2F16%2F105621" title="初めてのPerl 第10章 様々な制御構造 練習問題1 - 猿から人へ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2014-01-16 10:56:21 rich https://shiori.hatenablog.jp/entry/2014/01/16/105621 1.0 100%