perl

-2熱度

1回答

使用perl或shell將文件名插入到相同文件中

我有多個文件，我需要將文件名作爲新字段放入每個通訊文件中。 例子： My directory Sample1.txt Sample3.txt Sample2.txt Sample4.txt 我到每一個文件 頭Sample1.txt hg1 1 20 hg1 40 60 我需要爲每個文件 head Sample1.txt hg1 1 20 Sample1 hg1 40 60 S

linux perl multiple-files 2017-09-22

---

1熱度

3回答

使用正則表達式在Perl中應用過濾器

我試圖在perl中使用正則表達式從字符串中提取文本和數字。這裏是我的代碼： $line = "finish=100\n"; ($var) = $line =~ /[a-z]+/; ($val) = $line =~ /[0-9]+/; 我預期的輸出是$ VAR = 「完成」 和$ VAL = 100。然而，當我運行的代碼是$ var = 1和$ VAL = 1 任何幫助將不勝感激！

regex perl 2017-09-22

---

0熱度

1回答

Perl的 - 無法通過API發送圖像 - 拋出錯誤無法打開文件名在/usr/share/perl5/LWP/UserAgent.pm線419

use LWP::UserAgent; use File::Slurp; use warnings; use strict; my $baseUrl = 'xxxxx'; my $accessToken = 'xxxxx'; my $shelfGuid = 'xxxxx'; my $url = $baseUrl . 'yyyy'; my $sourceFile = '/h

perl api 2017-09-23

---

1熱度

1回答

使用Perl以UTF-8模式編寫文件

我需要在Perl中編寫一個使用UTF-8模式的文件。我如何創建？ 任何人都可以幫助在這種情況下？ 我想是這樣，我找到下面的代碼， use utf8; use open ':encoding(utf8)'; binmode(FH, ":utf32"); open(FH, ">test11.txt"); print FH "something Çirçös"; 它創建使用UTF-8格式的

perl 2017-09-23

---

0熱度

3回答

無法刪除用雙引號括起來的列中的回車符和換行符

我想刪除列數據中的所有不可打印的換行符。 我用雙引號括住了所有列，以便輕鬆地刪除列中出現的新行字符，並在每行結束後忽略記錄分隔符。 說，我有4列用逗號分隔，並在文本文件中用引號括起來。 我試圖刪除\ n和\ r字符，只有當它出現在雙引號 目前使用的裝飾件之間，但它刪除每一個換行符，並使它成爲序列文件沒有任何記錄分隔符。 tr -d '\n\r' <in.txt> out.txt 樣本數據： 「

perl awk sed gawk tr 2017-09-23

---

2熱度

1回答

：如何在代碼未檢測到時將一組SQL執行分組？

我有一個oracle-10046-aka。 SQLTRACE文件類似這樣的結構： Oracle Release 11.2 PARSING IN CURSOR #1 len=20 dep=0 uid=7 oct=6 lid=7 tim=2 hv=1 ad='1' sqlid='A' insert END OF STMT PARSING IN CURSOR #2 len=20 dep=0 ui

oracle perl instrumentation 2017-09-23

---

2熱度

2回答

Perl的文件句柄 - 覆蓋現有數據，而不是追加/刪除

cat -E test1.txt 輸出： car$ $ $ 我只想改變「車」和「自行車」，並刪除新的/空行。 這是按預期工作： #!/usr/bin/perl -w open(FILE1,"<","./test1.txt"); @araj=<FILE1>; close(FILE1); open(FILE2,">","./test1.txt"); map { [email pro

perl file-handling 2017-09-24

---

1熱度

1回答

Kaldi librispeech數據準備錯誤

我正在嘗試做ASR系統。我使用卡爾迪手冊和librispeech語料庫。 在數據準備階段我得到這個錯誤 utils/data/get_utt2dur.sh: segments file does not exist so getting durations from wave files utils/data/get_utt2dur.sh: could not get utterance le

bash perl kaldi 2017-09-24

---

1熱度

1回答

重命名外部作用域中的子使用變量中的文件（cygwin）

我正在使用cygwin。 這個腳本的作用是加載我已經加載到桌面上的目錄中的iphone圖片。 它在圖像查看器中打開它，讓我看看圖片。 system("cygstart $dirname/$oldfile") ; 然後它給了我重新命名圖片的選項。它雖然是拋出錯誤，而不是重命名圖片。 Use of uninitialized value $oldfile in concatenation (.)

perl subroutine file-copying 2017-09-25

---

0熱度

1回答

去除迭代ClearQuest API中的缺陷

迭代中可能存在多個缺陷。如何使用ClearQuest Perl API從迭代中刪除特定的缺陷？ $bfSession = CQSession::Build(); $bfSession->UserLogon($userID,$passwd,$dbname,$dbset); #Get iteration Entity $iterationEntity = $bfSession->GetEnti

perl clearquest 2017-09-25

---