Platon Technologies
neprihlásený Prihlásiť Registrácia
SlovakEnglish
open source software development oslavujeme 10 rokov vývoja otvoreného softvéru! Pondelok, 26. október 2026
[BACK] [TXT][DIR] Vyššie na [Platon] / scripts / shell / zoznamka-fun

Rozdiely pre scripts/shell/zoznamka-fun/sign-stats.sh medzi verziami 1.1 a 1.2

verzia 1.1, 2003/07/15 19:56:04 verzia 1.2, 2003/07/15 20:09:48
Riadok 12 
Riadok 12 
 # 15/07/2003 - created  # 15/07/2003 - created
 #  #
   
 # $Platon$  # $Platon: scripts/shell/zoznamka-fun/sign-stats.sh,v 1.1 2003/07/15 19:56:04 nepto Exp $
   
 #  #
 # [1] URL  # [1] URL
Riadok 25 
Riadok 25 
 #     ale bohuzial len v zverokruhu  #     ale bohuzial len v zverokruhu
 #   Vierovyznanie:  #   Vierovyznanie:
 #     verim v buducnost a v to ze aj tak raz pride nieco co ma naozaj  #     verim v buducnost a v to ze aj tak raz pride nieco co ma naozaj
   #
   # [3] Usage
   #
   #       ./sign-stats.sh ID | sort | uniq -c | sort -r > 2003-07-15.sign-stats.txt
 #  #
   
 if [ $# -lt 1 ]; then  if [ $# -lt 1 ]; then
Riadok 40  fi
Riadok 44  fi
   
 for id in $ids; do  for id in $ids; do
         lynx -dump "http://zoznamka.azet.sk/viac.phtml?&c_inz=$id&cast=2" \          lynx -dump "http://zoznamka.azet.sk/viac.phtml?&c_inz=$id&cast=2" \
         | perl -we 'while(<>){if(/Moje znamenie vo zverokruhu je:[^\w]*(.*)$/){print "$1\n";}}'          | perl -we 'while(<>){if(/Moje znamenie vo zverokruhu je:[^\w]*(.*)$/){print "$1\n";}}';
   
 #               print "$1\n"; while(<>){last if (! /^[ ]{5,5}.*$/);print;}}}'  
   
 done  done
   
Legend:
Odstranené z verzie1.1  
zmenené riadky
  Pridané vo verzii1.2
Platon Group <platon@platon.sk> http://platon.sk/
Copyright © 2002-2006 Platon Group
Stránka používa redakčný systém Metafox 		Na začiatok