my $vertical=$workbook->addformat();
$vertical->set_rotation(1); # letters run from top to bottom
# 2 for 90 degs anticlockwise
# 3 for 90 degs clockwise

##</code><code>##

$worksheet->write(0,0, "Title", $vertical);