Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Wednesday, October 14, 2026
[BACK] [TXT][DIR] Up to [Platon] / scripts / perl / foja

Diff for scripts/perl/foja/url-check.sh between version 1.1 and 1.2

version 1.1, 2002/02/03 19:44:36 version 1.2, 2002/02/04 00:17:51
Line 1 
Line 1 
 #!/bin/bash  #!/bin/bash
   
   SLEEP=2;
 REQUESTED_URL="http://www.dcs.fmph.uniba.sk/foja/foja_11.html"  REQUESTED_URL="http://www.dcs.fmph.uniba.sk/foja/foja_11.html"
 #REQUESTED_URL="http://kepler.fmph.uniba.sk/~jombik9/start.html"  #REQUESTED_URL="http://kepler.fmph.uniba.sk/~jombik9/start.html"
   
Line 19  action_cmd(){
Line 20  action_cmd(){
 REQUESTED_FILE=`echo $REQUESTED_URL | tr "/" "\n" | tail -n 1`  REQUESTED_FILE=`echo $REQUESTED_URL | tr "/" "\n" | tail -n 1`
   
 if [ -e $REQUESTED_FILE ]; then  if [ -e $REQUESTED_FILE ]; then
         echo "File '$REQUESTED_FILE' already downloaded. Try to remove...";          echo "File '$REQUESTED_FILE' already downloaded. Remove it first.";
         exit 1;          exit 1;
 fi  fi
   
Line 28  while [ 1 -eq 1 ]; do
Line 29  while [ 1 -eq 1 ]; do
         if [ -e $REQUESTED_FILE ]; then          if [ -e $REQUESTED_FILE ]; then
         action_cmd;          action_cmd;
         fi          fi
         sleep 2          sleep $SLEEP;
 done  done
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS 		Go to Top