| 查看: 556 | 回复: 6 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】请教torque问题
|
|||
|
各位，我们集群使用torque管理，然后计算结果要在计算完毕后输出e，o文件。 想请问能否采用qstat或者别的命令，随时查看到正在运行的任务的屏幕输出，以便及时调整，谢谢。 |
回复此楼» 猜你喜欢
收到复试调剂但是去不了
已经有7人回复
-
260求调剂
已经有5人回复
-
急需调剂
已经有10人回复
-
申博/考博
已经有4人回复
-
化工学硕294分，求导师收留
已经有37人回复
-
求调剂
已经有11人回复
-
一志愿华中农业071010，320求调剂
已经有19人回复
-
304求调剂
已经有7人回复
-
求博导｜生物质基多孔碳/超级电容方向，已有相关成果，寻能源材料/碳材料方向老师
已经有3人回复
-
二苯甲酮酸类衍生物
已经有6人回复
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
- 散金: 17637
- 红花: 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
20