프로그램...

[Perl] 잡다(Sort, .....)

크크다스 2019. 8. 23. 13:51
반응형

[Perl] 잡다


sorting

[Normal List]

foreach my $user ( keys %_Hash_OrderBook )


[Number(Float 포함)]

sort { $a <=> $b } ....... 


foreach my $idx ( sort {$a <=> $b} keys %{$_Hash_OrderBook{$user}{$sym}{$market}} )


[String]

sort  ....... 


foreach my $key ( sort keys %{$_Hash_OrderBook{$user}} )


[역순]

reverse sort


foreach my $market ( reverse sort keys %{$_Hash_OrderBook{$user}{$sym}} )



[Key 지정]

foreach $key ( sort { $_Hash_OrderList{$user}{$a}{price} <=> $_Hash_OrderList{$user}{$b}{price} } (keys %{$_Hash_OrderList{$user}}) )


반응형