質問失礼します。
現在、CentOS7(Apache2.4.6)にてperl5.16のwebサーバー環境を構築中なのですが、
perlのXML処理をする際に以下のエラーが出てしまいます。
■エラー内容:
Can't use string ("") as a HASH ref while "strict refs" in use at /var/www/html/・・・
現在レンタルwebサーバーにて運用中の同一プログラムでは問題無く動作するのですが、
構築中のCentOS7サーバーでは上記のエラーが発生しています。
該当部分のコードは以下の通りです。
use strict; use KCatch qw( source ); use CGI; use Jcode; use encoding 'euc-jp', STDOUT => "utf8"; use LWP::UserAgent; use HTTP::Request::Common qw(POST); use HTML::Template; require './pm/TreePP.pm'; my $req= HTTP::Request->new(POST => $url); $req->header('Content-Type' => 'text/xml'); $req->content($post_body); #$post_return = $ua->request($req)->as_string; $post_return = $ua->request($req)->content; # XMLインスタンスの生成と初期設定~読込み my $tpp = XML::TreePP->new(); $tpp->set( force_array => [qw( REC )] ); $tpp->set( utf8_flag => 1 ); $tpp->set( ignore_error => 1 ); my $myxml = $tpp->parse( "$post_return" ); ↓ここの部分でエラーになります。 my $status = $myxml->{response}->{result}->{status}; #status ↑ここの部分でエラーになります。
以下どなたかご教授頂けないでしょうか。
宜しくお願い致します。
回答1件
あなたの回答
tips
プレビュー