#!/usr/bin/perl -w
# File: getinfo.pl
# Creator: thinkhy
# Usage: ./getinfo path outputfile
# Date: 2010年 03月 07日 星期日 15:23:18 CST
# 回复梁同学的需求,写了个Perl脚本来实现功能:
#ubuntu系统:一个目录下有100个左右dat和txt文件,现需要你利用脚本程序把该目录下的每个文件的大小和行数计算出来,并把结果显示到一个excel文件中,第一列为文件名,第二列为文件大小,第三列为文件中字符的行数!
$path = $ARGV[0]; # 查找的路径
$output = $ARGV[1]; # 输出的csv文件名(不包括扩展名)
if (!$path || !$output) {
print "Usage: ./getinfo path outputfile/nHave f
[经验总结]Perl输出csv文件
最新推荐文章于 2024-08-03 06:06:00 发布
这篇博客分享了一段Perl脚本,用于在Ubuntu系统中遍历指定目录,查找.dat和.txt文件,计算它们的大小和行数,并将结果保存到CSV文件中。脚本通过命令行参数接收输入目录和输出文件名,使用find、ls、wc和stat等命令获取文件信息,并将结果以逗号分隔格式写入CSV文件。
摘要由CSDN通过智能技术生成