小编Avi*_*Das的帖子

如何在Perl文件中写入当前时间戳?

如何在Perl文件中写入当前时间戳?

我创建了一个名为的文件myperl.pl,它将打印当前的时间戳.该文件如下:

#!/usr/local/bin/perl
@timeData = localtime(time);
print "@timeData\n";
Run Code Online (Sandbox Code Playgroud)

现在我尝试将此文件的输出重定向到另一个文本文件.脚本如下:

#!/usr/local/bin/perl
@myscript = "/usr/bin/myperl.pl";
@myfile = "/usr/bin/output_for_myperl.txt";
perl "myscript" > "myfile\n";
Run Code Online (Sandbox Code Playgroud)

运行这个时,我得到以下错误:

perl sample_perl_script.pl
在sample_perl_script.pl第4行找到运算符所在的字符串,在"perl"myscript""
(你需要预先声明perl吗?)
(sample_perl_script.pl第4行,"perl"myscript"附近的语法错误")
执行sample_perl_script.pl因编译错误而中止.

perl

9
推荐指数
2
解决办法
8万
查看次数

如何通过perl脚本执行此URL时使用URL中的变量传递值

我试图通过perl脚本执行URL.最初,我在文本文件中保留一些值,并将文件中的值设置为参数.

#!/usr/bin/perl
use warnings;

open my $fh, '<','output_perl.txt' or die "Failed: $!\n";
my $text1 = do {
    local $/;
    <$fh>
};
close $fh or die "Failed again: $!\n";


open my $i, '<','output_perl_1.txt' or die "Failed: $!\n";
my $text2 = do {
    local $/;
    <$i>
};
close $i or die "Failed again: $!\n";


open my $j, '<','output_perl_2.txt' or die "Failed: $!\n";
my $text3 = do {
    local $/;
    <$j>
};
close $j or die "Failed again: $!\n";
Run Code Online (Sandbox Code Playgroud)

所以,当我尝试打印变量$text1,$text2 …

perl

1
推荐指数
1
解决办法
582
查看次数

标签 统计

perl ×2