当前时区为 UTC + 8 小时



发表新帖 回复这个主题  [ 9 篇帖子 ] 
作者 内容
1 楼 
 文章标题 : 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 11:53 

注册: 2007-07-14 14:43
帖子: 51
送出感谢: 0 次
接收感谢: 0 次
大家好,我现在遇到这么一个问题:

我电脑里装了一个叫做unafold.pl的程序,,其在命令行下可以以unafold.pl [file]的方式执行并在当前目录下产生结果文件。
此程序没有指定特别的输出目录,所有的输出文件都是命令行下的目录

我在用perl语言调用此程序后,想把unafold.pl产生的文件放入一个特定的文件夹,但总是不能成功,因为所有文件被放入我的 perl程序的目录。

请问如何实现更改unafold.pl的输出文件位置?

It is because the unafold.pl will output its files under the path of
given commend, eg. we open the terminal at /home/weasteam like this
"~$" and run "UNAFold.pl /home/weasteam/hiv/hiv.fas" the new files
will be output in /home/weasteam, but not in /home/weasteam/hiv/. In
my perl software, the folder where the software located will be
considered as such path and all unafold files will be pushed in this
folder which make our software unable to read the unafold files.

I have tried to use <system "cd path"> in perl to change the terminal
path but failed, do anyone have any suggestions to call one commend with
perl and specify the path of its output files? (ps, I have checked the
option of unafold.pl, in which no information about output path have
been mentioned.)


最后由 weasteam 编辑于 2009-02-19 12:23,总共编辑了 1 次

页首
 用户资料  
 
2 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 12:03 

注册: 2006-09-11 22:47
帖子: 2841
送出感谢: 0 次
接收感谢: 4
> 我在用perl语言调用此程序后,想把unafold.pl产生的文件放入一个特定的文件夹,但总是不能成功,因为所有文件被放入我的 perl程序的目录。

你想怎么放?究竟什么叫“不能成功”,你做了什么操作?得到什么提示?

学会google“提问的智慧”并阅读,你的问题会有效率得多。


页首
 用户资料  
 
3 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 12:23 

注册: 2007-07-14 14:43
帖子: 51
送出感谢: 0 次
接收感谢: 0 次
poet 写道:
> 我在用perl语言调用此程序后,想把unafold.pl产生的文件放入一个特定的文件夹,但总是不能成功,因为所有文件被放入我的 perl程序的目录。

你想怎么放?究竟什么叫“不能成功”,你做了什么操作?得到什么提示?

学会google“提问的智慧”并阅读,你的问题会有效率得多。


It is because the unafold.pl will output its files under the path of
given commend, eg. we open the terminal at /home/weasteam like this
"~$" and run "UNAFold.pl /home/weasteam/hiv/hiv.fas" the new files
will be output in /home/weasteam, but not in /home/weasteam/hiv/. In
my perl software, the folder where the software located will be
considered as such path and all unafold files will be pushed in this
folder which make our software unable to read the unafold files.

I have tried to use <system "cd path"> in perl to change the terminal
path but failed, do anyone have any suggestions to call one commend with
perl and specify the path of its output files? (ps, I have checked the
option of unafold.pl, in which no information about output path have
been mentioned.)


页首
 用户资料  
 
4 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 12:45 
头像

注册: 2005-08-14 21:55
帖子: 58428
地址: 长沙
送出感谢: 4
接收感谢: 272
$0取得程序路径。。。在设置一个输出的路径。
只是$0不一定是全路径。


_________________
● 鸣学


页首
 用户资料  
 
5 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 13:28 

注册: 2007-07-14 14:43
帖子: 51
送出感谢: 0 次
接收感谢: 0 次
eexpress 写道:
$0取得程序路径。。。在设置一个输出的路径。
只是$0不一定是全路径。


谢谢eexpress,,我还是不清楚如何设置一个输出路径?


页首
 用户资料  
 
6 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 13:57 
头像

注册: 2005-08-14 21:55
帖子: 58428
地址: 长沙
送出感谢: 4
接收感谢: 272
?? 没理解你意思
open一个指定路径的文件而已啊。修改保存。
open(BM, "$home/.config/rox.sourceforge.net/ROX-Filer/Bookmarks.xml")


_________________
● 鸣学


页首
 用户资料  
 
7 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-02-19 14:16 

注册: 2007-07-14 14:43
帖子: 51
送出感谢: 0 次
接收感谢: 0 次
谢谢楼上两位,,我查到解决方法了,,

具体方法如下:
代码:
use File::chdir;
$CWD = "/home/wu/b/R/datas/program/mi/test/ebv/";     # now in /foo/bar
system "UNAFold.pl ebv.fas";


成功!!!
我的perl程序在/home/wu/b/R/datas/program/mi/test/下,,调用system "UNAFold.pl [file]"时总是在/home/wu/b/R/datas/program/mi/test/目录产生文件,,但我想让它的文件产生在/home/wu/b/R/datas/program/mi/test/ebv/下面,,终于发现安装一个File::chdir就可以搞定。

再次谢谢


页首
 用户资料  
 
8 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-04-02 9:21 
头像

注册: 2007-02-27 21:47
帖子: 1473
地址: GL
送出感谢: 0 次
接收感谢: 0 次
不鼓励这样做 可以修改一下UNAFold.pl 并不难吧


_________________
Intel Pentium Dual Core 2.1G, 250G, DDRII 3G, ATI Radeon HD 4330
LMDE


页首
 用户资料  
 
9 楼 
 文章标题 : Re: 请教一个perl语言编程引用的问题
帖子发表于 : 2009-12-16 21:07 

注册: 2008-02-20 11:46
帖子: 84
送出感谢: 0 次
接收感谢: 0 次
你可以直接在命令行上输入你要保存的目录啊···解析一下参数就行了···改一下脚本很容易实现


页首
 用户资料  
 
显示帖子 :  排序  
发表新帖 回复这个主题  [ 9 篇帖子 ] 

当前时区为 UTC + 8 小时


在线用户

正在浏览此版面的用户:没有注册用户 和 2 位游客


不能 在这个版面发表主题
不能 在这个版面回复主题
不能 在这个版面编辑帖子
不能 在这个版面删除帖子
不能 在这个版面提交附件

前往 :  
本站点为公益性站点,用于推广开源自由软件,由 DiaHosting VPSBudgetVM VPS 提供服务。
我们认为:软件应可免费取得,软件工具在各种语言环境下皆可使用,且不会有任何功能上的差异;
人们应有定制和修改软件的自由,且方式不受限制,只要他们自认为合适。

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
简体中文语系由 王笑宇 翻译