niceload (parallel-20210122.tar.bz2) | : | niceload (parallel-20210222.tar.bz2) | ||
---|---|---|---|---|
skipping to change at line 26 | skipping to change at line 26 | |||
# General Public License for more details. | # General Public License for more details. | |||
# | # | |||
# You should have received a copy of the GNU General Public License | # You should have received a copy of the GNU General Public License | |||
# along with this program; if not, see <http://www.gnu.org/licenses/> | # along with this program; if not, see <http://www.gnu.org/licenses/> | |||
# or write to the Free Software Foundation, Inc., 51 Franklin St, | # or write to the Free Software Foundation, Inc., 51 Franklin St, | |||
# Fifth Floor, Boston, MA 02110-1301 USA | # Fifth Floor, Boston, MA 02110-1301 USA | |||
use strict; | use strict; | |||
use Getopt::Long; | use Getopt::Long; | |||
$Global::progname="niceload"; | $Global::progname="niceload"; | |||
$Global::version = 20210122; | $Global::version = 20210222; | |||
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) { | |||
version(); | version(); | |||
exit 0; | exit 0; | |||
} | } | |||
if($opt::help) { | if($opt::help) { | |||
help(); | help(); | |||
exit 0; | exit 0; | |||
} | } | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |