On a properly configured webserver, there is no way to get at the source code of any CGI script. But you won't need any of that, as you only have to check out the latest version of the scripts you have in your source code management tool, and compare the output of this script against the output of the program running on the website.

The steps are quite simple:

  1. Get a printout (or diff) of the output of your script and the productive output online.
  2. Mark up where you think they modified your source code.
  3. Contact your legal counsel to see whether pursuing this has merit. Especially ask whether your existing contract preventing them from modifying your script is valid.
  4. Provided that your legal counsel says that you won't be laughed out of court, send them a notice that you suspect them to be in violation of your software license.
  5. Either they restore your old version of the software, or tell you they already use a completely different software manufactured by somebody else. In both cases, they'll tell you.
  6. End of the story.

Personally, I don't see why anyone would enter a contract for software creation where they don't have the right to modify the software that was customized to them, and I'm not sure whether your case would be a case in a court. You can simply cancel all support for them, and void your support contract with them, as they modified the software in a way that the support contract does not cover.

But nothing of this has anything to do with Perl, and only with contract law. And I am not a lawyer, and this is not legal advice.

perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ;    # The  
$d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider
($c = $d->accept())->get_request(); $c->send_response( new   #in the
HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' #  web

[download]

In reply to Re: OT: Getting at source code of CGI scripts by Corion
in thread OT: Getting at source code of CGI scripts by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.