我想爲下面顯示的這個錯誤post子例程創建一個單元測試。此方法接受錯誤名稱並打印出每個錯誤中的值。這是我的代碼： use constant {
# link included as a variable in this example
ERROR_AED => {
errorCode => 561,
message => {"this is an e
我有三個子例程，有時會連續運行，有時會單獨運行，但會使用相同的參數（「TestNumber」）。我原來的代碼如下所示： Sub Main1()
Dim TestNumber As String
TestNumber = InputBox("Please enter TestNumber")
' Some codes running on TestNumber
我想在Perl中創建一個動態的子程序名，這裏是審判代碼，我 #!/usr/bin/perl
use strict;
use warnings;
BEGIN {
push @INC, '/freespace/attlas/data/bin/genericLoader /FeedLoaderLib/'
}
use feed_load;
my type ="L";
my $
我用一個子程序寫了這個簡單的程序。 當我把它放在一個子例程中時，它的行爲很奇怪。 #!/usr/bin/perl -w
use strict ;
sub get_name {
print "what is your name ?\n" ;
my $name = <STDIN> ;
chomp($name) ;
print "Hello $name\n";