月：目指す人 火：ライバル 水：自分を受け入れてくれるはずだと思う人 陸：一緒にいると落ち着く人 太陽：尊敬している人 石：恐れている人 空：大本命 川：自分に悪い影響を与える人 砂：好きな人 山：頼れる人 雲：手の届かない人 雪：少し気になる人

コマンドラインからのファイルリスト読み込みは http://www.tohoho-web.com/wwwperl1.htm @ARGV # 引数の配列 $#ARGV # 配列の個数−1 $ARGV[0] # 最初の引数 $ARGV[$#ARGV] # 最後の引数 という変数を利用すればいいはず。。。。 @FLIST = @ARGV; ＃コマンド…