24小时热门版块排行榜    

查看: 1834  |  回复: 8

lijunjiexm

铁虫 (小有名气)

[求助] 请教perl脚本的一个if语句解释,谢谢

第一次接触perl脚本,碰到一语句不懂

if (-s "$CODE.ex" ) { } else { $BAD="$CODE.ex DOES NOT EXIST"; USAGE; };

请教一下if (-s "$CODE.ex" ) 是什么意思? 谢谢

[ Last edited by lijunjiexm on 2012-2-5 at 00:44 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zideiwuying

金虫 (初入文坛)

【答案】应助回帖


感谢参与,应助指数 +1
jjdg(金币+1): 感谢参与 2012-02-05 09:05:22
lijunjiexm(金币+10): 有帮助 2012-02-06 10:20:30
如果"$CODE.ex"存在则返回"$CODE.ex"的大小,以字节为计量单位
2楼2012-02-05 00:51:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijunjiexm

铁虫 (小有名气)

引用回帖:
2楼: Originally posted by zideiwuying at 2012-02-05 00:51:13:
如果"$CODE.ex"存在则返回"$CODE.ex"的大小,以字节为计量单位

-s 是判断存在的意思??
3楼2012-02-05 00:59:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gaoyang636

木虫 (著名写手)

【答案】应助回帖


感谢参与,应助指数 +1
xzhdty(金币+1): 欢迎常来 2012-02-05 13:38:49
-s 可以理解为size ,返回文件的字节数(即大小)

» 本帖已获得的红花(最新10朵)

4楼2012-02-05 10:29:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijunjiexm

铁虫 (小有名气)

送鲜花一朵
引用回帖:
4楼: Originally posted by gaoyang636 at 2012-02-05 10:29:36:
-s 可以理解为size ,返回文件的字节数(即大小)

谢谢 如果code=mk
,其语句
if (-s "$CODE.ex" ) { } else { $BAD="$CODE.ex DOES NOT EXIST"; USAGE; };
运行结果是:

PROBLEM: mk.ex DOES NOT EXIST
Die at make_mk.pl  line41.

这说明的什么意思,刚怎么做呢?
5楼2012-02-06 10:17:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijunjiexm

铁虫 (小有名气)

我吧make_mk.pl脚本文件和可执行文件mk.ex放在同一个目录下,是不是这样子还不够?
6楼2012-02-06 10:20:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zideiwuying

金虫 (初入文坛)

【答案】应助回帖


xzhdty(金币+1): 欢迎常来 2012-02-07 23:41:06
-s可以理解为判断文件是否存在,如果文件存在则返回文件的大小,如果不存在返回空,可以用下面的代码测试(如果有test.sh需要和代码放在同一个目录下);

$file="test.sh";
if ($file_size=(-s $CODE )){
        print "$file exist and the size is $file_size\n";
}else{
        print "$file DOES NOT EXIST [$file_size]\n";
}
7楼2012-02-06 11:04:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijunjiexm

铁虫 (小有名气)


jjdg(金币+1): 感谢参与 2012-02-07 11:10:56
引用回帖:
7楼: Originally posted by zideiwuying at 2012-02-06 11:04:53:
-s可以理解为判断文件是否存在,如果文件存在则返回文件的大小,如果不存在返回空,可以用下面的代码测试(如果有test.sh需要和代码放在同一个目录下);

$file="test.sh";
if ($file_size=(-s $CODE ...

非常感谢,怎么在文件面前输入路径(假设文件在G根目录下)呢,我的意思是:

if (-s "$G:/CODE.ex" )

这样对吗?
8楼2012-02-06 23:28:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zideiwuying

金虫 (初入文坛)

【答案】应助回帖

lijunjiexm(金币+20): ★★★很有帮助 谢谢 2012-02-09 11:48:09
引用回帖:
8楼: Originally posted by lijunjiexm at 2012-02-06 23:28:40:
非常感谢,怎么在文件面前输入路径(假设文件在G根目录下)呢,我的意思是:

if (-s "$G:/CODE.ex" )

这样对吗?

不知道你是不是手误,$写错位置了吧,应该是:if (-s "G:/$CODE.ex" )
上面是Windows的写法,如果是在Unix下写绝对路径和相对路径应该是都可以的;另外,我写的那个例子是在Unix下测试的
9楼2012-02-07 12:00:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lijunjiexm 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 oepdf5z972 2026-06-20 3/150 2026-06-21 21:01 by zo4669e5n4
[基金申请] E0414, 我的本子有没有希望? +7 布布和一二 2026-06-17 9/450 2026-06-21 19:29 by 布布和一二
[考研] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 3/150 2026-06-21 19:18 by q1p9ixelzp
[教师之家] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 3/150 2026-06-21 18:58 by q1p9ixelzp
[公派出国] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 3/150 2026-06-21 18:00 by q1p9ixelzp
[考研] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 4/200 2026-06-21 17:45 by q1p9ixelzp
[论文投稿] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 3/150 2026-06-21 17:40 by q1p9ixelzp
[论文投稿] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 9skg9htng1 2026-06-20 3/150 2026-06-21 17:37 by q1p9ixelzp
[公派出国] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 4/200 2026-06-21 17:25 by ky8v3skvft
[考博] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 5/250 2026-06-21 17:20 by ky8v3skvft
[博后之家] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 6/300 2026-06-21 17:05 by ky8v3skvft
[公派出国] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 5/250 2026-06-21 17:00 by ky8v3skvft
[教师之家] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +5 vlfdw50o0u 2026-06-20 7/350 2026-06-21 16:57 by ky8v3skvft
[论文投稿] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 vlfdw50o0u 2026-06-20 5/250 2026-06-21 16:45 by ky8v3skvft
[教师之家] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 7/350 2026-06-21 16:40 by ky8v3skvft
[论文投稿] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +4 vlfdw50o0u 2026-06-20 9/450 2026-06-21 16:37 by ky8v3skvft
[基金申请] 青A35岁以下通知答辩了吗 +3 暨阳一只柴 2026-06-17 3/150 2026-06-21 09:39 by kudofaye
[考博] 【全奖博士/科研助理/博后招生】新加坡南洋理工大学机械与航空航天学院 +3 robohaha 2026-06-15 4/200 2026-06-21 00:36 by lanbing1
[基金申请] 希望面上有个好结果 +7 碧水00 2026-06-16 7/350 2026-06-18 12:18 by wuke100666
[论文投稿] 三区计算机方向期刊推荐 +5 1457340941 2026-06-15 5/250 2026-06-17 13:16 by 会议编辑
信息提示
请填处理意见