0

関連するデータを持つ 2 つの配列があります。それらをhtmlテーブルに挿入する必要があります。フォーラムを検索して見つけたモジュールを使用して、別のプログラムからこれらの配列にアクセスしています。

package My::Module;
use strict;
use warnings;
use File::Slurp;
use Data::Dumper;
use Exporter;

our @ISA = 'Exporter';
our @EXPORT = qw(\@owners \@values);
our(@owners, @values);
$Data::Dumper::Indent = 1;

my @fileDatas = read_file("/x/home/venganesan/output.txt");

これは My フォルダの下にあり、Module.pm という名前です。テーブルを持つ他のファイルの部分は

use strict;
use warnings;
use CGI;
use My::Module;
my $q = new CGI;

print $q->header;
print $q->start_html(-title=>"Table testing", -style =>{'src'=> '/x/home/venganesan/style.css'});

print $q->h1("Modified WOWO diff");
print $q->table(        {-border=>1, cellpadding=>3},
        $q->Tr($q->th(['WOWODiff', 'Owner', 'Signoff'])),
        foreach $own(@owners){
        $q->Tr(
        $q->td([$own,'Two', 'Three'])},
        $q->td(['four', 'Five', 'Six']),

        ),

1つの配列を印刷して、それがどのように機能するかを確認し、もう1つの配列を含めようとしています。私が取得している出力は、Module.pm を使用したときに、html を使用しないコマンド ラインの両方の配列です。削除すると、html コードが表示されます。私はその場でperlと新しいモジュールを学んでいます。私は批判とコードを実装するためのより良い方法を受け入れます。

4

1 に答える 1

0

2013 年です。最近では、CGI.pm を使用して HTML を生成する人はいないはずです。ヘッダーの生成と CGI リクエストの解析には必ず CGI.pm を使用してください。ただし、HTML には Template Toolkit のようなものを使用することを検討してください。

あなたの質問が何であるかはっきりしません。My::Module を使用するとエラーが発生するということですか (ちなみに、これはひどい名前です)。その場合、Web サーバーのエラー ログに何が書き込まれるかを確認し、そこに示されている問題に対処する必要があります。

于 2013-07-28T13:39:17.230 に答える