perl

    0熱度

    3回答

    我想將一個變量傳遞給自定義Perl腳本。 $file="my_wa/fin" if [[ "$file" == *"fin" ]]; then script.pl fi 在我的劇本我嘗試使用$file我的路徑打開和讀取文件 my $input_filename = "$ENV{file}"; 我明白,我需要以某種方式將其導出,並接受它在我的Perl代

    5熱度

    2回答

    如何理解Perl File I/O中open()函數的以下用法? open(FHANDLE, ">" . $file) 我試圖找到這種類型的語法in the docs但沒有找到;請注意有一個。 (點)「>」後。 我所不能理解的是使用點,我知道的其餘部分。

    -2熱度

    1回答

    是否可以使用POSIX模塊在Perl中將給定時間戳轉換爲GMT?下面是我已經試過了,但不知道爲什麼時間是如此的遙遠...... use POSIX; my $shipts = "2017-09-23 20:53:00"; my $shiptsgmt = strftime("%Y-%m-%d %R", localtime(str2time($shipts, 'GMT'))); print "$

    1熱度

    1回答

    我試圖使用random.org計算真隨機數的GCD並從文本文件中獲取這些數字。這是一個使用我之前創建的PRNG來完成上述操作的程序。 #!/usr/bin/perl use strict; use warnings; my $range = 100; my $gcdcount = 0; sub gcd_iter($$) { my ($u, $v) = @_; whil

    2熱度

    2回答

    我有一個叫list.txt文件,它看起來像這樣:(它有500行) /apps/gtool/0.7.5/gtool -M --g gen1.txt etc /apps/gtool/0.7.5/gtool -M --g gen2.txt etc /apps/gtool/0.7.5/gtool -M --g gen3.txt etc 我要讓.SH腳本的每一行LIST.TXT。我能做到這一點在Pe

    -1熱度

    1回答

    我想一個字符串返回給我的shell腳本,我得到和錯誤: Can't return outside a subroutine at ... $result = "Error: $ARGV[0] changed!" return ($result); 上的任何想法如何,我可以通過它回到了我的殼?

    -4熱度

    1回答

    我試圖使用Mercury Parser得到網頁的字數。 <div><p>Content of the webpage goes here</p> </div>"","next_page_url":null,"excerpt":"Get started learning all about SEO from the industry's most trusted source, Search Eng

    1熱度

    1回答

    我正在調用perl子例程,並將路徑作爲來自unix CLI模式的參數。 但是獲得Bareword發現錯誤。無論如何要通過這個。 [[email protected] ~/test]**$perl -e "require qw(./burt.pm) ;file(/u/path,/u/build/);"** Bareword found where operator expected at -e l

    2熱度

    1回答

    我知道print,printf,die,warn,say具有不同的功能,但所有打印到控制檯。我正在開發一個項目,將日誌框架集成到Perl中,所以我需要知道所有將輸出輸出到控制檯的函數,而不管它們的功能如何。

    1熱度

    1回答

    在Excel頁面設置縮放選項了高大是否有通過Perl來適合1頁(S)僅寬(高應爲空)在Excel中,這樣我們就可以設置縮放的方式「將所有列放在一個頁面上」。與以下相同。 試過「$ worksheet1-> fit_to_pages(1,0);」,但它正在改變到1,1-(1-寬& 1高的)。