Newsgroups: fj.questions.unix
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!newsbase.nisiq.net!news.win.or.jp!ayamura-win!tamaru-news!kuee-news!odins-suita!narans!nide
From: nide@ics.nara-wu.ac.jp (NIDE Naoyuki)
Subject: Re: sort
Message-ID: <1997Jul2.032745.2086@cc.nara-wu.ac.jp>
Sender: news@cc.nara-wu.ac.jp
Nntp-Posting-Host: shannon.e.ics.nara-wu.ac.jp
Organization: Nara Women's University
X-Newsreader: mnews [version 1.19PL2] 1996-01/26(Fri)
References: <5p1v1o$jja$1@park.med.nagoya-u.ac.jp>
	<JIRO.97Jun28154353@ace.nerimadors.or.jp>
	<5pah7j$k9f$1@park.med.nagoya-u.ac.jp>
Date: Wed, 2 Jul 1997 03:27:45 GMT
Lines: 14
Xref: galaxy.trc.rwcp.or.jp fj.questions.unix:7163
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.questions.unix&nb=7163&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

In Message <5pah7j$k9f$1@park.med.nagoya-u.ac.jp>,
takuji@med.nagoya-u.ac.jp writes:
> > j?perl -e 'print sort {$a=~/[$B%!(B-$B%s(B]+$/;$aa=$&;$b=~/[$B%!(B-$B%s(B]+$/;$aa cmp $&;} <>;'
> $B0lEY!"(B"$B$o(B"$B$^$GMh$F$+$i!"$^$?(B"$B$"(B"$B$,;O$^$C$F$7$^$$$^$7$?!#(B

  $B@55,I=8=$,!V(B$$B!W$G=*$o$C$F$k$N$,$$$1$J$+$C$?$h$&$G$9$M!#(B

jperl -e 'print sort {$a=~/[$B%!(B-$B%s(B]+/;$aa=$&;$b=~/[$B%!(B-$B%s(B]+/;$aa cmp $&;} <>;'

$B$G$O$I$&$G$7$g$&(B?

# $B6qBNE*$J%G!<%?$,<($5$l$?$N$G$:$C$H$o$+$j$d$9$/$J$C$?(B

nide@ics.nara-wu.ac.jp
