「Perl」sort関数で配列の要素を昇順にする
構文
sort(条件式)配列名
使用例
#! /usr/bin/perl use strict; use warnings; my @cft = (34,5,18,79); @cft = sort{$a <=> $b}@cft; print ($cft[0]); print ($cft[1]); print ($cft[2]); print ($cft[3]);
結果
5
18
34
79
Coding Changes the World
構文
sort(条件式)配列名
使用例
#! /usr/bin/perl use strict; use warnings; my @cft = (34,5,18,79); @cft = sort{$a <=> $b}@cft; print ($cft[0]); print ($cft[1]); print ($cft[2]); print ($cft[3]);
結果
5
18
34
79