「Perl」sort関数で配列の要素を昇順にする

2020年11月29日

構文
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

Perl

Posted by arkgame