次のコードを使用して、自己記述モジュールからスレッドにサブルーチンを渡そうとしています。 これはスレッドを初めて使用したので、私はそれに慣れていません。 メインスクリプト（shortend）このコードを実行する #!/usr/bin/perl -w
use strict;
use threads;
use lib 'PATH TO LIB';
use goldstandard;
my
データベースのように動作します。 私が欲しいの例は次のとおりです。 入力：% perl youscript.pl Create_table mydb regtable REGION COUNTRY 出力： mydb.txt(The contents of this file):
regtable
REGION|COUNTRY
と 入力：% perl youscript.pl Creat
use strict;
use warnings;
sub maximum_value {
my @array = @_;
my @array1 = shift(@_);
my @array2 = push(@_, 0);
print "@array\n";
print "@array1\n";
print "@array2\n