| 查看: 469 | 回复: 6 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】请教torque问题
|
|||
|
各位,我们集群使用torque管理,然后计算结果要在计算完毕后输出e,o文件。 想请问能否采用qstat或者别的命令,随时查看到正在运行的任务的屏幕输出,以便及时调整,谢谢。 |
» 猜你喜欢
请问哪里可以有青B申请的本子可以借鉴一下。
已经有4人回复
真诚求助:手里的省社科项目结项要求主持人一篇中文核心,有什么渠道能发核心吗
已经有6人回复
孩子确诊有中度注意力缺陷
已经有14人回复
三甲基碘化亚砜的氧化反应
已经有4人回复
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
请问有评职称,把科研教学业绩算分排序的高校吗
已经有5人回复
2025冷门绝学什么时候出结果
已经有3人回复
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
AI论文写作工具:是科研加速器还是学术作弊器?
已经有3人回复
fengya0785
银虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 274.6
- 帖子: 57
- 在线: 27.4小时
- 虫号: 753763
- 注册: 2009-04-21
- 性别: GG
- 专业: 计算机体系结构

2楼2009-07-20 15:04:45
3楼2009-08-02 03:32:04
solocheng
荣誉版主 (文坛精英)
黑洞洞主
- 应助: 430 (硕士)
- 贵宾: 2.61
- 金币: 16931.4
- 散金: 17631
- 红花: 684
- 沙发: 215
- 帖子: 26621
- 在线: 1260小时
- 虫号: 467239
- 注册: 2007-11-25
- 专业: 免疫遗传学
- 管辖: 职场人生

4楼2009-08-02 12:01:10
fengya0785
银虫 (小有名气)
![]() |
5楼2009-08-03 11:31:56
6楼2009-08-05 08:13:47
★ ★ ★ ★ ★ ★
wuli8(金币+3,VIP+0):3KS 8-20 13:36
TIGERYZZ(金币+3,VIP+0):这个是perl写的?好专业……好好看看去,谢谢了 8-20 21:00
wuli8(金币+3,VIP+0):3KS 8-20 13:36
TIGERYZZ(金币+3,VIP+0):这个是perl写的?好专业……好好看看去,谢谢了 8-20 21:00
|
可以参考使用qpeek #!/usr/bin/perl # qpeek: Peek into a job's output spool files # Copyright 2001, Ohio Supercomputer Center # # Usage: qpeek [options] JOBID # # Options: # -c Show all of the output file ("cat", default) # -h Show only the beginning of the output file ("head" ![]() # -t Show only the end of the output file ("tail" ![]() # -f Show only the end of the file and keep listening ("tail -f" ![]() # -# Show only # lines of output # -e Show the stderr file of the job # -o Show the stdout file of the job # -? Display help $tool="cat"; $numlines=""; $suffix="OU"; $spool="/var/spool/pbs/spool"; $host="oscbw"; while ( $ARGV[0] =~ /^-.*/ ) { if ( $ARGV[0] eq "-c" ) { $tool="cat"; } elsif ( $ARGV[0] eq "-f" ) { $tool="tail -f"; } elsif ( $ARGV[0] eq "-h" ) { $tool="head"; } elsif ( $ARGV[0] eq "-t" ) { $tool="tail"; } elsif ( $ARGV[0] =~ /^-[0-9]+$/ ) { $numlines=$ARGV[0]; } elsif ( $ARGV[0] eq "-e" ) { $suffix="ER" } elsif ( $ARGV[0] eq "-o" ) { $suffix="OU" } elsif ( $ARGV[0] eq "-?" || $ARGV[0] eq "-help" ) { print STDERR < Usage: qpeek [options] JOBID Options: -c Show all of the output file ("cat", default) -h Show only the beginning of the output file ("head" ![]() -t Show only the end of the output file ("tail" ![]() -f Show only the end of the file and keep listening ("tail -f" ![]() -# Show only # lines of output -e Show the stderr file of the job -o Show the stdout file of the job (default) -? Display this help message EOF exit; } else { print STDERR "qpeek: Unrecognized option $ARGV[0] ignored\n"; } shift(@ARGV); } $jobid=shift(@ARGV); $jobid=~s/\.[A-z0-9.]+$//; die "No jobid given!\n" if ( $jobid eq "" ); $node=&mothersuperior($jobid); die "Job $jobid is not running!\n" if ( $node eq "" ); exec "rsh $node $tool $numlines $spool/$jobid.$host.$suffix\n"; sub mothersuperior { local($jobid,$node); $jobid=$_[0]; $node=""; open(QSTAT,"qstat -f $jobid |" ;while ( { chop; if ( $_ =~ /exec_host/ ) { ($keyword,$node)=split(/=/); $node=~s:/[0-9]+[A-z0-9/+]*::; } } $node; } [ Last edited by 123qweasd7962 on 2009-8-20 at 11:47 ] |
7楼2009-08-20 11:44:23













回复此楼
