人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

PHPの初心者です。
いろいろな、プログラムサンプルを結合して、プログラムを作成しております。

下記、foreachから抜け出すために、”5”以上になったらforeachをBreakするということがやりたいのですが、

-------------------
# 使用するモジュールの読み込み
use strict;
use warnings;
use Encode;

<< 途中省略 >>

foreach $result1 ( reverse( @{$response1->{'results'}} ) ) {
my $text1 = Encode::encode('utf8', $result1->{'text'});

<< 途中省略 >>

if ( $count > 5 )
{
$count = 0;
break;
}
else
{
$count = $count + 1;
}
}

Bareword "break" not allowed while "strict subs" in use at /var/www/html/bbs/combot2/combot.pl line 46.
(46行は、breakの箇所です。)
というエラーがでます。解放をおしえてください。

●質問者: ooamishirasato
●カテゴリ:コンピュータ ウェブ制作
✍キーワード:AT BBS HTML PHP WWW
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● b-wind
●60ポイント ベストアンサー

PHPの初心者です。

どーみても Perl コードなのにこの書き出しはないだろ。


制御構文 [Perl講座 -Smart]

ループを抜ける制御構文は last だ。

◎質問者からの返答

・・・ Perlでした!!

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ