Convert spreadsheets to CSV using LibreOffice Calc, even with a window open

tocsv

#!/usr/bin/perl
use 5.014;
use Cwd;
use File::Temp ();
use File::Spec;

my $file = $ARGV[0] or die "Provide a file to convert.\n";
my $tempdir = File::Temp->newdir;
my $profile = File::Spec->catdir($tempdir, "profile");

# Use a temporary profile to allow the command to run even if there's another
# LibreOffice running (e.g. a GUI window).  See:
#   <https://bugs.documentfoundation.org/show_bug.cgi?id=37531#c24>
my $libre_profile = "-env:UserInstallation=file://$profile";

my $cmd = "libreoffice --convert-to csv --outdir '${\cwd()}' '$libre_profile' '$file'";
say $cmd;
exit system($cmd);  # Don't use exec, or else tempdir won't be cleaned up