とあるエンジニアの闇歴史帳

コピペで使える便利Wiki ※現在構築中です。

ユーザ用ツール


サイドバー

言語

サーバ関連

ツール

API

読み物

その他

perl:array_reverse

配列を逆順に並べ替える(reverse) - Perl

この記事は2007年05月26日に書かれた物です

リスト(配列)を逆に並べ替えるお手軽な方法はreverseを用いることだ。

サンプル

;#
;#配列を逆順にする
;#
 
use strict;
 
#--------------------------#
#       配列を初期化       #
#--------------------------#
my @array = (3,4,1,2,5);       #でたらめ
 
#--------------------------#
#        逆転して表示      #
#--------------------------#
print "■通常表示\n";
print "$_\n" foreach( @array );
 
print "■逆転表示\n";
print "$_\n" foreach( reverse @array );
 
print "■逆転表示(ソート含み)\n";
print "$_\n" foreach( reverse sort @array );  #並べ替えるのはsort

実行結果

■通常
3
4
1
2
5

■逆転
5
2
1
4
3

■逆転(整頓含み)
5
4
3
2
1

関連書籍

failed to fetch data: unkown error

failed to fetch data: unkown error

関連ページ

perl/array_reverse.txt · 最終更新: 2020/06/23 14:10 (外部編集)