tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-10-18 04:49:40 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Released as 20230222 ('Gaziantep')

Browse source
This commit is contained in:
Ole Tange 2023-02-22 23:47:51 +01:00
parent b06698bee1
commit 9b225e2efd
20 changed files with 81 additions and 60 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
NEWS
View file

@ -1,3 +1,19 @@
20230222
New in this release:
* parsort: --parallel now does closer to what you expect.
* parallel: --files0 is --files but \0 separated.
* Bug fixes and man page updates.
News about GNU Parallel:
* 5 great Perl scripts to keep in your sysadmin toolbox
https://www.redhat.com/sysadmin/perl-scripts
20230122 20230122
New in this release: New in this release:

24
README
View file

@ -57,11 +57,11 @@ document.
Full installation of GNU Parallel is as simple as: Full installation of GNU Parallel is as simple as:
wget https://ftpmirror.gnu.org/parallel/parallel-20230122.tar.bz2 wget https://ftpmirror.gnu.org/parallel/parallel-20230222.tar.bz2
wget https://ftpmirror.gnu.org/parallel/parallel-20230122.tar.bz2.sig wget https://ftpmirror.gnu.org/parallel/parallel-20230222.tar.bz2.sig
gpg parallel-20230122.tar.bz2.sig gpg parallel-20230222.tar.bz2.sig
bzip2 -dc parallel-20230122.tar.bz2 | tar xvf - bzip2 -dc parallel-20230222.tar.bz2 | tar xvf -
cd parallel-20230122 cd parallel-20230222
./configure && make && sudo make install ./configure && make && sudo make install
@ -70,11 +70,11 @@ Full installation of GNU Parallel is as simple as:
If you are not root you can add ~/bin to your path and install in If you are not root you can add ~/bin to your path and install in
~/bin and ~/share: ~/bin and ~/share:
wget https://ftpmirror.gnu.org/parallel/parallel-20230122.tar.bz2 wget https://ftpmirror.gnu.org/parallel/parallel-20230222.tar.bz2
wget https://ftpmirror.gnu.org/parallel/parallel-20230122.tar.bz2.sig wget https://ftpmirror.gnu.org/parallel/parallel-20230222.tar.bz2.sig
gpg parallel-20230122.tar.bz2.sig gpg parallel-20230222.tar.bz2.sig
bzip2 -dc parallel-20230122.tar.bz2 | tar xvf - bzip2 -dc parallel-20230222.tar.bz2 | tar xvf -
cd parallel-20230122 cd parallel-20230222
./configure --prefix=$HOME && make && make install ./configure --prefix=$HOME && make && make install
Or if your system lacks 'make' you can simply copy src/parallel Or if your system lacks 'make' you can simply copy src/parallel
@ -122,8 +122,8 @@ will love you for it.
When using programs that use GNU Parallel to process data for When using programs that use GNU Parallel to process data for
publication please cite: publication please cite:
Tange, O. (2023, January 22). GNU Parallel 20230122 ('Bolsonaristas'). Tange, O. (2023, February 22). GNU Parallel 20230222 ('Gaziantep').
Zenodo. https://doi.org/10.5281/zenodo.7558957 Zenodo. https://doi.org/10.5281/zenodo.7668338
Copyright (C) 2007-2022 Ole Tange, http://ole.tange.dk and Free Copyright (C) 2007-2022 Ole Tange, http://ole.tange.dk and Free
Software Foundation, Inc. Software Foundation, Inc.

20
configure vendored
View file

@ -1,6 +1,6 @@
#! /bin/sh #! /bin/sh
# Guess values for system-dependent variables and create Makefiles. # Guess values for system-dependent variables and create Makefiles.
# Generated by GNU Autoconf 2.71 for parallel 20230122. # Generated by GNU Autoconf 2.71 for parallel 20230222.
# #
# Report bugs to <bug-parallel@gnu.org>. # Report bugs to <bug-parallel@gnu.org>.
# #
@ -610,8 +610,8 @@ MAKEFLAGS=
# Identity of this package. # Identity of this package.
PACKAGE_NAME='parallel' PACKAGE_NAME='parallel'
PACKAGE_TARNAME='parallel' PACKAGE_TARNAME='parallel'
PACKAGE_VERSION='20230122' PACKAGE_VERSION='20230222'
PACKAGE_STRING='parallel 20230122' PACKAGE_STRING='parallel 20230222'
PACKAGE_BUGREPORT='bug-parallel@gnu.org' PACKAGE_BUGREPORT='bug-parallel@gnu.org'
PACKAGE_URL='' PACKAGE_URL=''
@ -1246,7 +1246,7 @@ if test "$ac_init_help" = "long"; then
# Omit some internal or obsolete options to make the list less imposing. # Omit some internal or obsolete options to make the list less imposing.
# This message is too long to be a string in the A/UX 3.1 sh. # This message is too long to be a string in the A/UX 3.1 sh.
cat <<_ACEOF cat <<_ACEOF
\`configure' configures parallel 20230122 to adapt to many kinds of systems. \`configure' configures parallel 20230222 to adapt to many kinds of systems.
Usage: $0 [OPTION]... [VAR=VALUE]... Usage: $0 [OPTION]... [VAR=VALUE]...
@ -1313,7 +1313,7 @@ fi
if test -n "$ac_init_help"; then if test -n "$ac_init_help"; then
case $ac_init_help in case $ac_init_help in
short | recursive ) echo "Configuration of parallel 20230122:";; short | recursive ) echo "Configuration of parallel 20230222:";;
esac esac
cat <<\_ACEOF cat <<\_ACEOF
@ -1390,7 +1390,7 @@ fi
test -n "$ac_init_help" && exit $ac_status test -n "$ac_init_help" && exit $ac_status
if $ac_init_version; then if $ac_init_version; then
cat <<\_ACEOF cat <<\_ACEOF
parallel configure 20230122 parallel configure 20230222
generated by GNU Autoconf 2.71 generated by GNU Autoconf 2.71
Copyright (C) 2021 Free Software Foundation, Inc. Copyright (C) 2021 Free Software Foundation, Inc.
@ -1427,7 +1427,7 @@ cat >config.log <<_ACEOF
This file contains any messages produced by compilers while This file contains any messages produced by compilers while
running configure, to aid debugging if configure makes a mistake. running configure, to aid debugging if configure makes a mistake.
It was created by parallel $as_me 20230122, which was It was created by parallel $as_me 20230222, which was
generated by GNU Autoconf 2.71. Invocation command line was generated by GNU Autoconf 2.71. Invocation command line was
$ $0$ac_configure_args_raw $ $0$ac_configure_args_raw
@ -2379,7 +2379,7 @@ fi
# Define the identity of the package. # Define the identity of the package.
PACKAGE='parallel' PACKAGE='parallel'
VERSION='20230122' VERSION='20230222'
printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h
@ -3026,7 +3026,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
# report actual input values of CONFIG_FILES etc. instead of their # report actual input values of CONFIG_FILES etc. instead of their
# values after options handling. # values after options handling.
ac_log=" ac_log="
This file was extended by parallel $as_me 20230122, which was This file was extended by parallel $as_me 20230222, which was
generated by GNU Autoconf 2.71. Invocation command line was generated by GNU Autoconf 2.71. Invocation command line was
CONFIG_FILES = $CONFIG_FILES CONFIG_FILES = $CONFIG_FILES
@ -3090,7 +3090,7 @@ ac_cs_config_escaped=`printf "%s\n" "$ac_cs_config" | sed "s/^ //; s/'/'\\\\\\\\
cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
ac_cs_config='$ac_cs_config_escaped' ac_cs_config='$ac_cs_config_escaped'
ac_cs_version="\\ ac_cs_version="\\
parallel config.status 20230122 parallel config.status 20230222
configured by $0, generated by GNU Autoconf 2.71, configured by $0, generated by GNU Autoconf 2.71,
with options \\"\$ac_cs_config\\" with options \\"\$ac_cs_config\\"

2
configure.ac
View file

@ -1,4 +1,4 @@
AC_INIT([parallel],[20230122],[bug-parallel@gnu.org]) AC_INIT([parallel],[20230222],[bug-parallel@gnu.org])
AM_INIT_AUTOMAKE([-Wall -Werror foreign]) AM_INIT_AUTOMAKE([-Wall -Werror foreign])
AC_CONFIG_HEADERS([config.h]) AC_CONFIG_HEADERS([config.h])
AC_CONFIG_FILES([ AC_CONFIG_FILES([

6
doc/haikus
View file

@ -14,9 +14,6 @@ Output is in sync
write a haiku about gnu parallel and the :::+ option write a haiku about gnu parallel and the :::+ option
Praise GNU parallel, though. That gets me pretty far.
-- Your Obed. Servant, J. B. @Jeffinatorator
Got around to using GNU parallel for the first time from a suggestion by @jdwasmuth ... now I'm wishing I started using this years ago Got around to using GNU parallel for the first time from a suggestion by @jdwasmuth ... now I'm wishing I started using this years ago
-- Stefan Gavriliuc @GavriliucStefan@twitter -- Stefan Gavriliuc @GavriliucStefan@twitter
@ -217,6 +214,9 @@ https://negfeedback.blogspot.com/2020/05/indispensable-command-line-tools.html
=== Used === === Used ===
Praise GNU parallel, though. That gets me pretty far.
-- Your Obed. Servant, J. B. @Jeffinatorator
Colorful output Colorful output
parallel, with --color flag parallel, with --color flag
tasks more vibrant now tasks more vibrant now

11
packager/obs/home-tange/parallel/.osc/_files
View file

@ -1,6 +1,7 @@
<directory name="parallel" rev="356" vrev="2" srcmd5="315b8389407e05d5cb1c1759f24cfc5f"> <directory name="parallel" rev="357" vrev="2" srcmd5="8b22cc3ffa45753dfa5a4240001ac4de">
<entry name="PKGBUILD" md5="b50fec0d85134fcb9f09fc63b773e494" size="1246" mtime="1674409249" /> <entry name="PKGBUILD" md5="937481255bdef9bf6e36c976230ac5a4" size="1246" mtime="1677105957" />
<entry name="parallel.spec" md5="0ab03fc781707374185c314f31f434b7" size="6224" mtime="1674409249" /> <entry name="parallel-20230222.tar.bz2" md5="b52e5921e6f56f4b0b9c9240a21f6375" size="2479103" mtime="1677105957" />
<entry name="parallel_20230122.dsc" md5="48838dce2a4cd8aa224340815dd4dd6f" size="556" mtime="1674409249" /> <entry name="parallel.spec" md5="282415ab75799825aac7b57a1d0d1869" size="6224" mtime="1677105957" />
<entry name="parallel_20230122.tar.gz" md5="5ac229e0452d195bf623fc06c5ec730b" size="2742846" mtime="1674409249" /> <entry name="parallel_20230222.dsc" md5="98eeb596514e210cb7d3a48bc69a43cd" size="556" mtime="1677105958" />
<entry name="parallel_20230222.tar.gz" md5="e2d58ac98b074e110d15ce6341e54e9c" size="2756543" mtime="1677105958" />
</directory> </directory>

2
packager/obs/home-tange/parallel/.osc/parallel.spec
View file

@ -1,7 +1,7 @@
Summary: Shell tool for executing jobs in parallel Summary: Shell tool for executing jobs in parallel
Name: parallel Name: parallel
Version: 20230122 Version: 20230222
Release: 2.1 Release: 2.1
License: GPL-3.0-or-later License: GPL-3.0-or-later
Group: Productivity/File utilities Group: Productivity/File utilities

2
src/env_parallel.ash
View file

@ -393,7 +393,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.bash
View file

@ -395,7 +395,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.dash
View file

@ -393,7 +393,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.ksh
View file

@ -376,7 +376,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.mksh
View file

@ -378,7 +378,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.sh
View file

@ -393,7 +393,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/env_parallel.zsh
View file

@ -368,7 +368,7 @@ _parset_main() {
fi fi
if [ "$_parset_NAME" = "--version" ] ; then if [ "$_parset_NAME" = "--version" ] ; then
# shellcheck disable=SC2006 # shellcheck disable=SC2006
echo "parset 20230122 (GNU parallel `parallel --minversion 1`)" echo "parset 20230222 (GNU parallel `parallel --minversion 1`)"
echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software" echo "Copyright (C) 2007-2023 Ole Tange, http://ole.tange.dk and Free Software"
echo "Foundation, Inc." echo "Foundation, Inc."
echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" echo "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>"

2
src/niceload
View file

@ -26,7 +26,7 @@
use strict; use strict;
use Getopt::Long; use Getopt::Long;
$Global::progname="niceload"; $Global::progname="niceload";
$Global::version = 20230122; $Global::version = 20230222;
Getopt::Long::Configure("bundling","require_order"); Getopt::Long::Configure("bundling","require_order");
get_options_from_array(\@ARGV) || die_usage(); get_options_from_array(\@ARGV) || die_usage();
if($opt::version) { if($opt::version) {

22
src/parallel
View file

@ -2752,7 +2752,7 @@ sub check_invalid_option_combinations() {
sub init_globals() { sub init_globals() {
# Defaults: # Defaults:
$Global::version = 20230122; $Global::version = 20230222;
$Global::progname = 'parallel'; $Global::progname = 'parallel';
$::name = "GNU Parallel"; $::name = "GNU Parallel";
$Global::infinity = 2**31; $Global::infinity = 2**31;
@ -5688,8 +5688,8 @@ sub usage() {
"If you use programs that use GNU Parallel to process data for an article in a", "If you use programs that use GNU Parallel to process data for an article in a",
"scientific publication, please cite:", "scientific publication, please cite:",
"", "",
" Tange, O. (2023, January 22). GNU Parallel 20230122 ('Bolsonaristas').", " Tange, O. (2023, February 22). GNU Parallel 20230222 ('Gaziantep').",
" Zenodo. https://doi.org/10.5281/zenodo.7558957", " Zenodo. https://doi.org/10.5281/zenodo.7668338",
"", "",
# Before changing these lines, please read # Before changing these lines, please read
# https://www.gnu.org/software/parallel/parallel_design.html#citation-notice # https://www.gnu.org/software/parallel/parallel_design.html#citation-notice
@ -5721,8 +5721,8 @@ sub citation_notice() {
"If you use programs that use GNU Parallel to process data for an article in a", "If you use programs that use GNU Parallel to process data for an article in a",
"scientific publication, please cite:", "scientific publication, please cite:",
"", "",
" Tange, O. (2023, January 22). GNU Parallel 20230122 ('Bolsonaristas').", " Tange, O. (2023, February 22). GNU Parallel 20230222 ('Gaziantep').",
" Zenodo. https://doi.org/10.5281/zenodo.7558957", " Zenodo. https://doi.org/10.5281/zenodo.7668338",
"", "",
# Before changing these line, please read # Before changing these line, please read
# https://www.gnu.org/software/parallel/parallel_design.html#citation-notice and # https://www.gnu.org/software/parallel/parallel_design.html#citation-notice and
@ -5849,20 +5849,20 @@ sub citation() {
"If you use programs that use GNU Parallel to process data for an article in a", "If you use programs that use GNU Parallel to process data for an article in a",
"scientific publication, please cite:", "scientific publication, please cite:",
"", "",
"\@software{tange_2023_7558957,", "\@software{tange_2023_7668338,",
" author = {Tange, Ole},", " author = {Tange, Ole},",
" title = {GNU Parallel 20230122 ('Bolsonaristas')},", " title = {GNU Parallel 20230222 ('Gaziantep')},",
" month = Jan,", " month = Feb,",
" year = 2023,", " year = 2023,",
" note = {{GNU Parallel is a general parallelizer to run", " note = {{GNU Parallel is a general parallelizer to run",
" multiple serial command line programs in parallel", " multiple serial command line programs in parallel",
" without changing them.}},", " without changing them.}},",
" publisher = {Zenodo},", " publisher = {Zenodo},",
" doi = {10.5281/zenodo.7558957},", " doi = {10.5281/zenodo.7668338},",
" url = {https://doi.org/10.5281/zenodo.7558957}", " url = {https://doi.org/10.5281/zenodo.7668338}",
"}", "}",
"", "",
"(Feel free to use \\nocite{tange_2023_7558957})", "(Feel free to use \\nocite{tange_2023_7668338})",
"", "",
# Before changing these lines, please read # Before changing these lines, please read
# https://www.gnu.org/software/parallel/parallel_design.html#citation-notice and # https://www.gnu.org/software/parallel/parallel_design.html#citation-notice and

14
src/parallel.pod
View file

@ -1586,9 +1586,9 @@ Similar to B<--memfree>.
See also: B<--memfree> B<--load> See also: B<--memfree> B<--load>
=item B<--latest-line> (alpha testing) =item B<--latest-line> (beta testing)
=item B<--ll> (alpha testing) =item B<--ll> (beta testing)
Print the lastest line. Each job gets a single line that is updated Print the lastest line. Each job gets a single line that is updated
with the lastest output from the job. with the lastest output from the job.
@ -1858,17 +1858,21 @@ Similar to B<--tty> but does not set B<--jobs> or B<--ungroup>.
See also: B<--tty> See also: B<--tty>
=item B<--output-as-files> =item B<--output-as-files> (alpha testing)
=item B<--outputasfiles> =item B<--outputasfiles> (alpha testing)
=item B<--files> =item B<--files> (alpha testing)
=item B<--files0> (alpha testing)
Save output to files. Save output to files.
Instead of printing the output to stdout (standard output) the output Instead of printing the output to stdout (standard output) the output
of each job is saved in a file and the filename is then printed. of each job is saved in a file and the filename is then printed.
B<--files0> uses NUL (\0) instead of newline (\n) as separator.
See also: B<--results> See also: B<--results>

4
src/parsort
View file

@ -30,7 +30,7 @@ Same as B<sort>. Except:
=over 4 =over 4
=item B<--parallel=>I<N> =item B<--parallel=>I<N> (alpha testing)
Change the number of sorts run concurrently to I<N>. I<N> will be Change the number of sorts run concurrently to I<N>. I<N> will be
increased to number of files if B<parsort> is given more than I<N> increased to number of files if B<parsort> is given more than I<N>
@ -137,7 +137,7 @@ GetOptions(
"help" => \$opt::dummy, "help" => \$opt::dummy,
) || exit(255); ) || exit(255);
$Global::progname = ($0 =~ m:(^|/)([^/]+)$:)[1]; $Global::progname = ($0 =~ m:(^|/)([^/]+)$:)[1];
$Global::version = 20230122; $Global::version = 20230222;
if($opt::version) { version(); exit 0; } if($opt::version) { version(); exit 0; }
# Remove -D and --parallel=N # Remove -D and --parallel=N
my @s = (grep { ! /^-D$|^--parallel=\S+$/ } my @s = (grep { ! /^-D$|^--parallel=\S+$/ }

2
src/sql
View file

@ -670,7 +670,7 @@ $Global::Initfile && unlink $Global::Initfile;
exit ($err); exit ($err);
sub parse_options { sub parse_options {
$Global::version = 20230122; $Global::version = 20230222;
$Global::progname = 'sql'; $Global::progname = 'sql';
# This must be done first as this may exec myself # This must be done first as this may exec myself