1.有两种方法:1. use Cwd;my $dir = getcwd;#$dir中即为当前目录的完整路径信息.2. my $dir = $ENV{'PWD'};#ENV是一个散列,用于存放环境变量.PWD是Linux的环境变量,表示当前所在目录. my $path=`pwd`;print $path,"/n"; 2.STAF的Lib库路径信息该程序利用Perl来调用STAF的接口,所以一定要将STAF相关的PM文件,库文件的路径信息指定.其中Perl程序中需要调用STAF的PM
对于常规java class打成jar文件后,要获取它的本地路径,可以用如下方法. final File f = new File(TestClass.class.getProtectionDomain().getCodeSource().getLocation().getPath()); System.out.println(f.getAbsolutePath()); 如果是SpringBoot的启动类,它会被SpringBoot的class loader加载,实际启动jar的时候其实启动的是
本地路径的创建 在做下载操作时,我们一般先把文件下载到本地指定的路径下,然后再做其他使用. 为了防止程序出现异常,我们通常需要先判断本地是否存在指定的路径. 以C盘Tmp文件夹为例,我们可以这样做,代码如下: if not DirectoryExists('C:\Tmp') then if not CreateDir('C:\Tmp') then raise Exception.Create('Opps, Create New Dir Failed!'); 清空本地指定文件夹下的文件 以C盘Tm
perl有句格言:There is more than one way to do it.意思就是任何问题用perl都有好几种解决方法.以前处理文件路径的时候都是自己写正则表达式,而用perl的模块来解决则更加迅速.准确. 1). File::Basename 有3个方法:fileparse.basename.dirname. 用法: ($name,$path,$suffix) = fileparse($fullname,@suffixlist); $basenam