my $book = ReadData ("test.gnumeric");               # function
  my $book = Spreadsheet::Read->new ("test.gnumeric"); # OO