CGI::Application::Util::Diff

Diff 2 directories or files, or run other commands
Download

CGI::Application::Util::Diff Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Ron Savage
  • Publisher web site:
  • http://search.cpan.org/~rsavage/

CGI::Application::Util::Diff Tags


CGI::Application::Util::Diff Description

Diff 2 directories or files, or run other commands CGI::Application::Util::Diff diffs 2 directories or files, or runs other commands. on the web server's machine.The output of a directory diff is a table, where the Match column contains a red 'x' if there is a mis-match in the sizes of a file or sub-directory in the 2 given directories.You click on a file name, or any field in the row, and a menu appears (beside the Diff button) which contains the actions available.The output of a file diff is the output of the shell's diff command.Available actions are in the file lib/CGI/Application/Util/Diff/.htutil.diff.actions.conf. They are listed below.There is an action confirmation option in this file, which you are strongly advised to leave as is.The confirmation is effected by means of a call to the Javascript confirm() function.I hope this will be the first in a set of such tools. I plan to release any of my own under the same namespace CGI::Application::Util::*.Since I expect this set to grow, I've decided to immediately adopt a Javascript library, rather than struggle with a more ad hoc approach. And the Yahoo User Interface, YUI, is the one I like the most.CGI::Application::Util::Diff is a Perl module that was developed using YUI V 2.7.0b.SynopsisA classic CGI script: use strict; use warnings; use CGI; use CGI::Application::Dispatch; # --------------------- my($cgi) = CGI -> new(); CGI::Application::Dispatch -> dispatch ( args_to_new => {QUERY => $cgi}, prefix => 'CGI::Application::Util', table => , );A modern FCGI script: use strict; use warnings; use CGI::Application::Dispatch; use CGI::Fast; use FCGI::ProcManager; # --------------------- my($proc_manager) = FCGI::ProcManager -> new({processes => 2}); $proc_manager -> pm_manage(); my($cgi); while ($cgi = CGI::Fast -> new() ) { $proc_manager -> pm_pre_dispatch(); CGI::Application::Dispatch -> dispatch ( args_to_new => {QUERY => $cgi}, prefix => 'CGI::Application::Util', table => , ); $proc_manager -> pm_post_dispatch(); } Requirements: · Perl


CGI::Application::Util::Diff Related Software