Announcement

Collapse
No announcement yet.

Order counting script

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

    #46
    Web,

    What a dozy git! Should really have thought of that myself.

    Cheers!

    Dave
    Cheers

    David
    Located in Edinburgh UK

    http://twitter.com/mcfinster

    Comment


      #47
      Returning results from several sites on different servers is relatively simple. Install a copy of Normans script on each server then on whichever server you wish to use to query add the following lines into the script:-

      use LWP::Simple;
      getprint("http://www.myurl.com/cgi/myscript.pl");

      Insert it after the print lines and it will display the results from the relevant site. Insert this for each server you wish to query.

      Dave
      Cheers

      David
      Located in Edinburgh UK

      http://twitter.com/mcfinster

      Comment


        #48
        assumes LWP::Simple is available though... not available on some of our servers.

        HTML and frames are universally available - (I know - some ancient browsers... )
        Web Design & Ecommerce - Affordable Web Hosting
        Free and low cost Merchant Accounts coming soon..
        NOD32 Antivirus - Reciprocal Links for Actinic Sites ONLY

        Comment


          #49
          We have been using this useful script for a few years now and just wonder if it would be possible to display how many current visitors are online.

          Many thanks

          Jason
          Regards

          Jason

          Titan Jewellery (Swift Design)
          Zirconium Rings
          Damascus Steel Rings

          Comment


            #50
            Such a great script (see page 2)

            Having trouble getting this to work on V10 site.

            Any ideas?

            Many thanks

            Jason
            Regards

            Jason

            Titan Jewellery (Swift Design)
            Zirconium Rings
            Damascus Steel Rings

            Comment


              #51
              Originally posted by Buzby View Post
              Such a great script (see page 2)

              Having trouble getting this to work on V10 site.

              Any ideas?

              Many thanks

              Jason
              Jason

              Check the other post for a likely answer

              Malcolm

              SellerDeck Accredited Partner,
              SellerDeck 2016 Extensions, and
              Custom Packages

              Comment


                #52
                Having been using this for years, once again, many thanks Norman.

                We are using this on V14, and have just changed to SSL and now the script has stopped working.

                Does anything need to be changed, or is it not possible to view on https ?

                A test url is here https://www.jewellery-workshop.co.uk/cgi-bin/758445.pl

                Code here

                #!/usr/bin/perl
                # Configuration: look in Actinic / Advanced / Network Setup and do the following 2 changes
                # Set top line to be #!<Path to the Perl shell>
                # Set following line to be $dir = '<Path From CGI-BIN to acatalog Directory>';
                $dir = '../httpdocs/buy/';
                print "content-type: text/html\n\n<head><title>Live Info: $dir</title></head><body>";
                print '<table bgcolor="#aaccee"><tr><td colspan=2><h3>' . (localtime time) . '</h3></td><tr>';
                opendir D, $dir;
                @entries = readdir D;
                closedir D;
                $sess = $ord = $occ = 0;
                foreach $entry (@entries)
                {
                if ($entry =~ /\.ord$/){ $ord++ }
                elsif ($entry =~ /\.occ$/){ $occ++ }
                elsif ($entry =~ /\.session$/){ $sess++ }
                }
                print "<tr><td>Orders:</td><td>$ord</td></tr>";
                print "<tr><td>Occ Sessions:</td><td>$occ</td></tr>";
                print "<tr><td>Sessions:</td><td>$sess</td></tr>";
                print "</table></body></html>";
                Regards

                Jason

                Titan Jewellery (Swift Design)
                Zirconium Rings
                Damascus Steel Rings

                Comment


                  #53
                  An 11 year old thread with over 50 posts including many updates, tweaks, suggestions, etc..

                  It's unlikely that anyone but yourself knows what "this" you are using.
                  Norman - www.drillpine.biz
                  Edinburgh, U K / Bitez, Turkey

                  Comment


                    #54
                    Hi Norman, it was your original code.

                    I have updated the post now.
                    Regards

                    Jason

                    Titan Jewellery (Swift Design)
                    Zirconium Rings
                    Damascus Steel Rings

                    Comment


                      #55
                      Could this line:
                      Code:
                      $dir = '../httpdocs/buy/';
                      need to be changed to point to the place where your SSL files now live?
                      Norman - www.drillpine.biz
                      Edinburgh, U K / Bitez, Turkey

                      Comment

                      Working...
                      X