# untested
sub bashquote
{
    local $_ = shift;
    defined or die "Argument must not be undef";
    /\x00/ and die "String must not contain NUL characters";
    s/'/'\''/g;
    return "'$_'";
}