Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1572626
  • 博文数量: 289
  • 博客积分: 11086
  • 博客等级: 上将
  • 技术积分: 3291
  • 用 户 组: 普通用户
  • 注册时间: 2006-06-22 17:06
个人简介

徐小玉的博客。

文章分类

全部博文(289)

文章存档

2023年(6)

2022年(1)

2021年(2)

2020年(9)

2019年(9)

2018年(6)

2017年(10)

2016年(10)

2014年(3)

2013年(4)

2011年(12)

2010年(16)

2009年(14)

2008年(119)

2007年(48)

2006年(20)

我的朋友

分类:

2008-03-05 14:20:10

#!/usr/bin/perl -w
use strict;
print "$0\n";
my $file=$0;  #得到文件名称
print "$file\n";
my @stat_file=stat($file);
my $size=$stat_file[7];
print "$size\n";
阅读(1521) | 评论(1) | 转发(0) |
给主人留下些什么吧!~~

chinaunix网友2008-03-05 14:20:45

#在本次活动中,您只需要计算一个文本文件中的字符个数。听起来不太难,是吧?麻烦在于该文本文件本身就是要编写的脚本文件。换句话说,您需要创建一个脚本用于统计该脚本自身包含的字符数。例如,如果创建一个名为 C:\Scripts\Count.vbs 的脚本,则该脚本应该返回文件 C:\Scripts\Count.vbs 中包含的字符数。该脚本应统计所有字符,包括空格,但不应统计回车换行符。 #现在要说到真正需要技巧的部分:无论您使用何种脚本文件名(当然,应该假定有正确的文件扩展名 – .vbs、.ps1 或 .pl 以便脚本能够运行)或将其放在任何文件夹下,该脚本必须均能够完成任务。这表示脚本名称不应硬编码到脚本文件当中。