perl - 從輸入到列的數組

-1

我一直在試圖做到這一點，我知道我做錯了，但如果有人可能可以協助指針，我將不勝感激。我所試圖做的是採取的文件名列表從文本文件管他們STAT通過一個for循環有Perl解析線爲列，這樣的事情：perl - 從輸入到列的數組

列表包括：

/home/hack/public_html/.htaccess 
/home/hack/public_html/index.php 
/home/hack/public_html/list

我知道這完全可以用Perl做，但我明確需要管道輸出到perl 像這樣：

for i in $(cat list); do stat $i | perl -wnl -e '@file=split /File:/ print @file;';done

我非常希望得到從統計輸出像這樣：

File: `.htaccess' 
Size: 177   Blocks: 8   IO Block: 4096 regular file 
Device: 5dh/93d Inode: 159909615 Links: 1 
Access: (0644/-rw-r--r--) Uid: ( 503/ hack) Gid: ( 503/ hack) 
Access: 2013-02-24 15:09:41.000000000 -0600 
Modify: 2013-02-10 14:24:04.000000000 -0600 
Change: 2013-02-24 15:09:42.000000000 -0600

但我只需要在安排列順序如下：

File: (the filename) Modify:(dates) Change:(dates) IO Block: (number)

任何人都可以讓我知道我做錯了嗎？

感謝

來源

2013-03-04 smoogle

這裏@file包含給定文件中的數據。現在您可以在@file上工作，並通過grep，split或pattern matching搜索所需的數據，將grepped數據存儲在某些變量中，並以您想要的任何順序打印這些變量。

來源

2013-03-04 07:42:19

perl - 從輸入到列的數組

回答

相關問題