ワイズリマインダー

配列をランダムに並び替える

List::Utilが使える場合

use List::Util;
@ARRAY=List::Util::shuffle @ARRAY;

List::Utilが使えない場合

@ARRAY=@{&Shuffle(@ARRAY)};

sub Shuffle{
    BEGIN{srand}
    my @OUT;
    push @OUT,splice @_,rand @_,1 while @_;
    return @OUT;
}

コメントは受け付けていません。

検索

最近のコメント

最近の投稿

タグ

Android C841M-4X-JSEC/K9 CentOS CentOS7 chrome cisco CKEditor cmd.exe CompositionAPI css F1 F1 2016 F1 2017 F1 2018 F1 2019 F1 2020 F1 2021 F1 2022 F1 2023 GapChart html HTML5 JavaScript jQuery LapChart Linux MySQL perl php SFC Vue3 Windows Windows10 WordPress イギリスGP イタリアGP オーストリアGP カスタマイズ ギャップチャート データベース トラブルシューティング ハンガリーGP バーレーンGP ラップチャート 単一コンポーネント

フィード配信

RSS 2.0
RDF
atom

アーカイブ

外部リンク