packimages.pl (86e1cf34) packimages.pl (b9fd132d)
1:
2eval 'exec perl -wS $0 ${1+"$@"}'
3 if 0;
4#**************************************************************
5#
6# Licensed to the Apache Software Foundation (ASF) under one
7# or more contributor license agreements. See the NOTICE file
8# distributed with this work for additional information

--- 42 unchanged lines hidden (view full) ---

51my $do_rebuild = 0; # is rebuilding zipfile required?
52
53my @custom_list;
54#### script id #####
55
56( my $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
57
58my $script_rev;
1:
2eval 'exec perl -wS $0 ${1+"$@"}'
3 if 0;
4#**************************************************************
5#
6# Licensed to the Apache Software Foundation (ASF) under one
7# or more contributor license agreements. See the NOTICE file
8# distributed with this work for additional information

--- 42 unchanged lines hidden (view full) ---

51my $do_rebuild = 0; # is rebuilding zipfile required?
52
53my @custom_list;
54#### script id #####
55
56( my $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
57
58my $script_rev;
59my $id_str = ' $Revision: 1.17 $ ';
59my $id_str = ' $Revision$ ';
60$id_str =~ /Revision:\s+(\S+)\s+\$/
61 ? ($script_rev = $1) : ($script_rev = "-");
62
63print "$script_name -- version: $script_rev\n";
64
65#### main #####
66
67parse_options();

--- 370 unchanged lines hidden ---
60$id_str =~ /Revision:\s+(\S+)\s+\$/
61 ? ($script_rev = $1) : ($script_rev = "-");
62
63print "$script_name -- version: $script_rev\n";
64
65#### main #####
66
67parse_options();

--- 370 unchanged lines hidden ---