Perl Data: Dumper 및 Storable 사용 방법

4218 단어
1. Data::Dumper는 스칼라, 그룹, 해시 또는 인용을 매개 변수로 지정하고 PERL 문법으로 이 데이터의 내용을 되돌려줍니다. 
 
  

#!/usr/bin/perl -w
use Data::Dumper;
use Storable;

my $a = "good";
my @myarray = ("hello", "world", "123", 4.5);
my %myhash = ( "foo" => 35,
"bar" => 12.4,
 "2.5"=> "hello",
"wilma" => 1.72e30,
"betty" => "bye/n");

print Dumper($a) ."
"x2;
print Dumper(\@myarray) ."
"x2;
print Dumper(\%myhash) ."
"x2;
print Dumper((\%myhash, \@myarray)) ."
"x2;


실행 결과는 다음과 같습니다. $VAR1 ='good';
$VAR1 = [   'hello',   'world',   '123',   '4.5' ];
$VAR1 = {   'betty' => 'bye/n',   'bar' => '12.4',   'wilma' => '1.72e+30',   'foo' => 35,   '2.5' => 'hello' };
$VAR1 = {   'betty' => 'bye/n',   'bar' => '12.4',   'wilma' => '1.72e+30',   'foo' => 35,   '2.5' => 'hello' }; $VAR2 = [   'hello',   'world',   '123',   '4.5' ];
2, Storable 결합 Data::Dumper 및 Storable 데이터 저장 및 재확보.U디스크로 데이터를 복사해서 다른 서버에서 펼칠 수 있습니다. 
 
  

#!/usr/bin/perl -w
use Data::Dumper;
use Storable;

my $a = "good";
my @myarray = ("hello", "world", "123", 4.5);
my %myhash = ( "foo" => 35,
   "bar" => 12.4,
   "2.5"=> "hello",
   "wilma" => 1.72e30,
   "betty" => "bye/n");

print Dumper($a) ."
"x2;

print Dumper(\@myarray) ."
"x2;

print Dumper(\%myhash) ."
"x2;

print Dumper((\%myhash, \@myarray)) ."
"x2;

###use Storable
print "
method 1,use Storable retrieve data:
";
store \%myhash,'./file.txt'; #
my $hashref=retrieve('./file.txt'); #

print Dumper(\%$hashref);

좋은 웹페이지 즐겨찾기