綾小路龍之介の素人思考

perl - [リファレンス] リファレンステスト(1)

リファレンスとは何ぞやということがわかっていなかったので、テストコードを書いてみた。なんとなくわかった気がする。それでもわからなきゃData::Dumperでも使ってなってことだ。

@LoL = ( ["00", "01"], ["10", "11", "12"], ["20"] );
  print $LoL[1][1];
#  11
#    $ref =\@LoL;
#    print $ref;
@value = @LoL;
print "\n";
foreach my $ref_array (@value){ 
print $ref_array;
 foreach (@$ref_array){ 
    print $_.","; 
 } 
 print "\n"; 
}
print @LoL;
#  ARRAY(0x83c38)ARRAY(0x8b194)ARRAY(0x8b1d0)
exit;

ソーシャルブックマーク

  1. はてなブックマーク
  2. Google Bookmarks
  3. del.icio.us

ChangeLog

  1. Posted: 2007-10-03T18:44:49+09:00
  2. Modified: 2007-10-03T04:23:54+09:00
  3. Generated: 2016-12-13T23:09:18+09:00