add comment selection and change zero recurring flags, RT#41733

diff --git a/bin/part_pkg-bulk_change b/bin/part_pkg-bulk_change
index f6d8b6c..0c7bc1d 100755 (executable)
--- a/bin/part_pkg-bulk_change
+++ b/bin/part_pkg-bulk_change
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 use strict;
 #!/usr/bin/perl
 
 use strict;

-use vars qw( $opt_r $opt_p $opt_o $opt_v );
+use vars qw( $opt_r $opt_p $opt_o $opt_v $opt_s $opt_S $opt_z $opt_Z );

 use Getopt::Std;
 use FS::UID qw(adminsuidsetup);
 use FS::Record qw(qsearch qsearchs);
 use Getopt::Std;
 use FS::UID qw(adminsuidsetup);
 use FS::Record qw(qsearch qsearchs);