這個問題是關於要求在Perl的系統發生了什麼事情的一些解釋，因爲我不含蓄明白這一點，雖然我」現在編碼已經有25年多了。所以這裏的故事... 試圖在Perl5中與Cyrus::IMAP::Admin實例一起工作我試圖獲取並打印配額列表，導致返回的結構化數據有點奇怪。 my %quotas = $client->listquota(@list[0]);
if ($client->error) {
我用圖表模塊生成CSV數據PNG格式的圖表時擺脫未定義值的警告： 它運作良好，圖表看行不行，但是我得到該undef值警告（有在上圖的最後3個這樣的值）： # ~/txv3.pl "./L*TXV3*.csv" > /var/www/html/x.html
Generating chart: L_B17_C0_TXV3LIN_PA3_TI1_CI1
Use of uninitialized va
我只想寫我自己的Perl腳本通過我的ISP的郵件服務器發送電子郵件。因爲我對Perl內置套接字函數感興趣，所以我開始嘗試它（我已經使用IO :: Socket編寫了一些小工具，並且想提高我對內置函數的瞭解）。 我當前的代碼： use Socket;
use diagnostics;
my $port = 25;
my $server = "<Servername>";
socket(SOC
main.pl： #!/usr/bin/perl
use strict;
use warnings;
use v5.14;
use ReadData;
my $read = ReadData->new();
my @name = $read->getNames();
$read->printNames(@name);
ReadData.pm： #!/usr/bin/perl