Select Code to Download

#!perl
use strict;
...
my $sheet = $book->Worksheets('sheet1');
$sheet->Range("A1")->{Value} = localtime; # update something
$book->Save;