my $tmp = File::Temp-> new( SUFFIX => '.ods' )-> filename;
copyL 'whatever.ods', $tmp; 
say 'ok' if defined ReadData( $tmp );