in reply to Further On Down the Line
Shouldn't that be:
?my $mainfilepath = $mw->getOpenFile(-filetypes => $typesopen, -defaultextension => '.xlsx'); ## xls => + xls_x_
Also some error-checking after getting the file name, as well as 'open' would be nice.
..to maintain is to slowly feel your soul, sanity and sentience ebb away as you become one with the Evil.