perl

0熱度

2回答

open(INFILE1,"INPUT.txt"); my $modfile = 'Data.txt'; open MODIFIED,'>',$modfile or die "Could not open $modfile : $!"; for (;;) { my $line1 = <INFILE1>; last if not defined $line1;

-3熱度

3回答

使用perl處理彈出窗口使用硒

我想爲以下方案提供解決方案：在頁面上傳xml並單擊上載按鈕時，我將收到一個確認彈出窗口（我可以檢測到這一點），在這之後，我再次收到一個彈出窗口，我無法檢測到（頁面仍然在瀏覽器中加載）。請幫我解決這個問題。我已經嘗試過許多解決方案，例如：獲取窗口ID，標題。感謝

-1熱度

1回答

perl的while循環不工作

3熱度

1回答

perl dancer - 「任何」方法 - 哪種實際方法稱爲？

使用Perl的舞者模塊，如果你有一個「任何」的方法（這將匹配GET/POST/PUT /刪除），你怎麼能確定使用哪種方法實際的瀏覽器？ #!/usr/bin/perl use Dancer; my $instance = someclass->new(); any('/' => sub{ my $method = ??? my $params = params();

0熱度

1回答

從DBI查詢中爲perl中的文本字段獲取2種不同的長度

我在存儲爲文本字段的mysql表中加密了數據。一切最初都是在Windows perl中編寫的，並且仍然可以正常工作。我的問題是，我在Linux上運行相同的代碼，當我查詢表中的perl文本結果告訴我這是更長的（這導致我的解密，因爲它太長而炸燬）。這發生在運行相同的腳本，所以我知道沒有代碼差異。 Mysql服務器是在OpenSuSE Linux 11.4 x64上運行的5.1.63。 Linux

0熱度

2回答

perl線程創建 - 如何正確指定類實例方法？

線程有問題。在使用類實例方法創建線程作爲子例程時，請保持錯誤。方法和參數變量是基於其他東西設置的，所以我必須以這種方式調用類實例方法。沒有線程，它工作得很好。想不出來指定它的線程的正確方法創建： my $instance = someclass->new(); my $method = 'get'; my $params = { 'abc' => 123 }; my $thread = th

0熱度

4回答

正則表達式用於刪除特定字符之前的字符？

我在正則表達式方面很新穎，並且完全誠實地讓我困惑。在到達字符串中的某個字符後，我需要抓住字符串。我認爲最簡單的方法是使用正則表達式，不過就像我說過的，我對它很陌生。任何人都可以幫我解決這個問題，或者指點我的方向嗎？例如：我需要檢查字符串「23444：thisstring」並將「thisstring」保存爲新字符串。

3熱度

1回答

我怎樣才能獲得原始數據並使用Apache2 :: Request來訪問參數？

Apache2 ::請求似乎沒有提供獲取原始發佈數據的方式;有沒有我想念的東西？另外，有沒有辦法單獨讀取發佈的數據（在內容處理程序中 - 之前沒有任何應該與發佈數據混淆）並使用它初始化Apache2 :: Request？

2熱度

1回答

這裏的文檔中的JQuery不工作

是否有可能在perl的here-doc部分中包含JQuery。我試過但沒有成功。這是我的代碼。 my $cgi = CGI->new();print header();print start_html("JQuery in perl"); print <<JS; <script src="//ajax.googleapis.com/ajax/libs/jquery/1.9.1/jquer

2熱度

1回答

如何使用perl連接到postgresql

use DBI; my $db_host = 'localhost'; my $db_user = 'postgres'; my $db_pass = '12345'; my $db_name = 'postgres'; my $db = "dbi:pg:dbname=${db_name};host=${db_host}"; $dbh = DBI->connect($db, $db_u