Lines Matching refs:Keys
249 my @Keys = qw( 0123 12 -1234 9 987654321 def ) ;
264 @srt_1 = sort { $a <=> $b } @Keys ;
266 my @srt_2 = sort { $a cmp $b } @Keys ;
267 my @srt_3 = sort { length $a <=> length $b } @Keys ;
269 foreach (@Keys) {
301 my @Keys = qw( 0123 9 12 -1234 9 987654321 def ) ;
320 @srt_1 = sort { $a <=> $b } @Keys ;
322 my @srt_2 = sort { $a cmp $b } @Keys ;
323 my @srt_3 = sort { length $a <=> length $b } @Keys ;
325 foreach (@Keys) {
368 my @Keys = qw( 0123 9 12 -1234 9 987654321 9 def ) ;
387 @srt_1 = sort { $a <=> $b } @Keys ;
389 my @srt_2 = sort { $a cmp $b } @Keys ;
391 foreach (@Keys) {