$ perl test.pl
Sheet: Sheet1
( 0 , 0 ) => this
( 1 , 1 ) => is
( 2 , 2 ) => a
( 3 , 3 ) => test
( 4 , 1 ) => 什麼
Sheet: Sheet2
Sheet: Sheet3
$