新規作成 | 管理 | 差分 | 検索 | FrontPage | ページ一覧 | 更新履歴 | RSS

PlugIn/from-to - 第1引数の数値から第2引数の数値までのリストを返す

管理

第1引数の数値から第2引数の数値までのリストを返す

$plugin->def("from-to",
  "第1引数の数値から第2引数の数値までのリストを返す",
  sub {
    my $from = shift;
    my $to =shift;
    if (abs($to - $from) > 100) {
      $to = ($from < $to) ? $from + 100 : $from - 100;
    }
    return ($from .. $to);
  }
);

改善

管理

あまり長すぎるリストは作れないように。--SHIMADA

  sub {
    my $from = shift;
    my $to =shift;
+   if (abs($to - $from) > 100) {
+     $to = ($from < $to) ? $from + 100 : $from - 100;
+   }
    return ($from .. $to);
  }

修正しました。- rica 2003-07-19 (Sat) 06:47:26

テスト

管理

97 98 99 100 101