The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

Name

Flip::Flop - Flop a switch in your script to zero after a clean run with the switch set to one.

Synopsis

Some where at the top of your program you might have some variables that select the actions the code is to perform on the next run from your IDE:

 my $doUpload = Flip::Flop::uploadToCloud(1);

 ...

 if ($doUpload)
  {....
   exit(1) unless ... upload succeeded.
  }

If the upload succeeds, your program source code will be modified to read:

  my $doUpload = Flip::Flop::uploadToCloud(0);

so that the next time you run your program this selected operation will not be performed unless you explicitly re-request it.

If the run does not succeed the switch will be left unchanged.

Installation

This module is written in 100% Pure Perl and, thus, it is easy to read, use, modify and install.

Standard Module::Build process for building and installing modules:

  perl Build.PL
  ./Build
  ./Build test
  ./Build install

Author

philiprbrenan\@gmail.com

http://www.appaapps.com

Copyright

Copyright (c) 2016-2017 Philip R Brenan.

This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.

END