PirateGov

[ergoil]

καταρχήν εκτελω το:

Κώδικας: Επιλογή όλων

pdftotext -raw deltio.pdf

To αρχείο που προκύπτει το αλλάζω σε greekglish (γιατί δεν έχω ελληνικά στο υπολογιστή μου, εσείς που έχετε μην το αλλάξτετε και βάλτε το σωστό στον κώδικα, δηλαδή grep ΥΠΟΥΡΓΕΙΟ αντί για UPOURGEIO) και το ονομάζω σε lala.txt

μετά βάζω τον παρακάτω κώδικα σε ένα αρχείο π.χ. parse.bash

Κώδικας: Επιλογή όλων

#!/bin/bash
a=`grep -nr "ΥΠΟΥΡΓΕΙΟ" $1|cut -f1 -d":"`
ll=`cat $1|wc -l`
a=`echo $a" "$ll`
echo $a
b=1
for i in $a
do

d=`expr $i - $b`
ii=`expr $i - 1`
head -$ii $1|tail -$d > tempor.$ii
title=`head -1 tempor.$ii|cut -f2 -d" "`
mv tempor.$ii UPOURGEIO."$title".$ii
echo ""
echo "created UPOURGEIO.$title".$ii
echo ""

echo "searching NOMOSXEDIA"

j=1
while [ $j -gt 0 ]
do
ji=`grep -n ^$j"." UPOURGEIO."$title".$ii`
echo $ji
if [ "$ji" = "" ]; then
j="-1"
fi
j=`expr $j + 1`
done

b="$i"
done

και γράφω:

Κώδικας: Επιλογή όλων

parse.bash lala.txt

χώρισα έτσι το αρχείο σε μικρότερα αρχεία, ανά υπουργεία και μέσα στα αρχεία αυτά εντόπισα στο περίπου από που ξεκινάει το κάθε νομοσχέδιο (ψάχνοντας με grep για ^1. ^2. ^3. κλπ)
όταν εξαρχής δεν βρίσκουμε ούτε το ^1. στο αρχείο του υπουργείου, αυτό σημαίνει οτι το υπουργείο έχει ένα μόνο νομοσχέδιο.

to be continued....

[ergoil]

το έτρεξε κανείς με ελληνικά;

[ergoil]

Νέα βερσιον!

Κώδικας: Επιλογή όλων

#!/bin/bash
a=`grep -n "ΥΠΟΥΡΓΕΙΟ" $1|cut -f1 -d":"`
ll=`cat $1|wc -l`
a=`echo $a" "$ll`
echo $a
b=1
for i in $a
do
d=`expr $i - $b`
ii=`expr $i - 1`
head -$ii $1|tail -$d > tempor.$ii
title=`head -1 tempor.$ii|cut -f2 -d" "`
mv tempor.$ii UPOURGEIO."$title".$ii
echo ""
echo "created UPOURGEIO.$title".$ii
echo ""
echo "searching NOMOSXEDIA"
nomosx=""
j=1
while [ $j -gt 0 ]
do
ji=`grep -n ^$j"." UPOURGEIO."$title".$ii|cut -f1 -d":"`
nomosx=`echo $nomosx" "$ji`
if [ "$ji" = "" ]; then
j="-1"
fi
j=`expr $j + 1`
done
ns=`cat UPOURGEIO."$title".$ii|wc -l`
nomosx=`echo $nomosx" "$ns`
echo $nomosx
bn=1
for nom in $nomosx
do
dn=`expr $nom - $bn`
iin=`expr $nom - 1`
head -$iin UPOURGEIO."$title".$ii|tail -$dn > UPOURGEIO."$title".$ii.@.$nom
bn="$nom"
done
b="$i"
done

Για το deltio-12-4-2012.pdf μου βγάζει τα αρχεία

UPOURGEIO.TΩΝ.26
UPOURGEIO.TΩΝ[email protected]
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,.101
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,[email protected]
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,[email protected]
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,[email protected]
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.112
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,[email protected]
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.40
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,[email protected]
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,[email protected]
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,[email protected]
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ.49
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ[email protected]
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ.123
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ[email protected]
UPOURGEIO.ΕΡΓΑΣΙΑΣ.141
UPOURGEIO.ΕΡΓΑΣΙΑΣ[email protected]
UPOURGEIO.ΕΡΓΑΣΙΑΣ[email protected]
UPOURGEIO.ΕΡΓΑΣΙΑΣ[email protected]
UPOURGEIO.ΕΡΓΑΣΙΑΣ.156
UPOURGEIO.ΕΡΓΑΣΙΑΣ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.233
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.286
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.74
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ[email protected]
UPOURGEIO.ΠΑΙΔΕΙΑΣ,.298
UPOURGEIO.ΠΑΙΔΕΙΑΣ,[email protected]
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.324
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,[email protected]
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,[email protected]
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,[email protected]
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ.336
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ[email protected]
UPOURGEIO.ΥΠΟΔΟΜΩΝ,.345
UPOURGEIO.ΥΠΟΔΟΜΩΝ,[email protected]

όποιο αρχείο έχει @ είναι νομοσχέδιο!

αρκεί τώρα να ψάξεις μέσα σε κάθε @ αρχείο για το λήμμα "Έτοιμο για ψήφιση" και μόλις το βρεις, βαράς συναγερμό για να ψηφίσουν οι πειρατές.

πάντως άμα κοιτάξεις τα εβδομαδιαία δελτία, το 90% των νομοσχεδίων εκκρεμεί σε κάτι μόνιμες επιτροπές και ελάχιστα πάνε προς ψήφιση Φαίνεται ότι οι διαρκείς μόνιμες επιτροπές ουσιαστικά ακυρώνουν το κοινοβουλευτικό έργο, μιας και είναι αδύνατο να φτάσει κάτι στη βουλή προς ψήφιση αν δεν το εγκρίνουν αυτές.Επίσης ένα άλλο πράγμα που παρατηρεί κανείς είναι ότι τα μικρά κόμματα κάνουν spam συνέχεια και καταθέτουν ανά τακτά διαστήματα το ίδιο νομοσχέδιο, το οποίο συνέχεια εκκρεμεί! Μάλλον γιαυτό τις βάλανε τις επιτροπές, για να σταματήσει το σπαμ! Η γελοία αυτή τακτική η οποία μέσα από το σπαμ και από τις επιτροπες-moderators ουσιαστικά ακυρώνει την λειτουργία της βουλής, είναι ένας ακόμα λόγος για το οποίο επιβάλεται οι ψηφοφορίες από τις οποίες παράγονται οι νόμοι να μην ακολουθούν το μοντέλο κατάθεση-συζήτηση-ψήφιση-τέλος αλλά αντίθετα να μην λήγουν ποτέ. Να είναι μόνιμες-ζωντανές και ανά πάσα στιγμή υπό την κρίση του οποιουδήποτε βουλευτή και του συνόλου των βουλευτών.

[baskin]

Κάνε το procedure ένα ωραίο document (odt ή pdf) να το βάλω στο Κουμπάσο στο project για να μην τα ψάχνουμε μέσα στο forum.

[ergoil]

βάλτο στο wiki του pirategov, για να υπάρχει version control (ελπίζω να υπάρχει history στo wiki του κουμπάσο, αλλιώς πετάχτε το και βάλτε άλλο wiki)

[baskin]

βάλτο στο wiki του pirategov, για να υπάρχει version control (ελπίζω να υπάρχει history στo wiki του κουμπάσο, αλλιώς πετάχτε το και βάλτε άλλο wiki)

Θα το κάνω μόλις βρω χρόνο. Αν δεν πετάξεις την παπαριά σου, δεν μπορείς. Έχει history σαν κανονικό wiki.

Και φτιάξε τα ελληνικά στο linux σου!

[ergoil]

νέα βέρσιον

Κώδικας: Επιλογή όλων

#!/bin/bash
a=`grep -n "ΥΠΟΥΡΓΕΙΟ" $1|cut -f1 -d":"`
ll=`cat $1|wc -l`
a=`echo $a" "$ll`
b=1
for i in $a
do
d=`expr $i - $b`
ii=`expr $i - 1`
head -$ii $1|tail -$d > tempor.$ii
title=`head -1 tempor.$ii|cut -f2 -d" "`
mv tempor.$ii UPOURGEIO."$title".$ii
nomosx=`grep -n ^[123456789][0123456789.][.\ ] UPOURGEIO."$title".$ii|cut -f1 -d":"`
ns=`cat UPOURGEIO."$title".$ii|wc -l`
nomosx=`echo $nomosx" "$ns`
bn=1
for nom in $nomosx
do
dn=`expr $nom - $bn`
iin=`expr $nom - 1`
head -$iin UPOURGEIO."$title".$ii|tail -$dn > temponom.$ii
etoim=`grep "για συζήτηση" temponom."$ii"`
if [ "$etoim" = "" ]; then
etoim=`grep "για ψήφιση" temponom."$ii"`
if [ "$etoim" = "" ]; then
mv temponom.$ii UPOURGEIO."$title"."$ii"_"$nom"
else
mv temponom.$ii UPOURGEIO."$title"."$ii"_"$nom"_psifisi
fi
else
mv temponom.$ii UPOURGEIO."$title"."$ii"_"$nom"_sizitisi
fi
bn="$nom"
done
b="$i"
done

μας λέει και ποιά νομοσχέδια είναι έτοιμα προς συζήτηση ή ψήφιση

UPOURGEIO.TΩΝ.26
UPOURGEIO.TΩΝ.26_26_sizitisi
UPOURGEIO.ΑΓΡΟΤΙΚΗΣ.49
UPOURGEIO.ΑΓΡΟΤΙΚΗΣ.49_16
UPOURGEIO.ΑΓΡΟΤΙΚΗΣ.49_23_psifisi
UPOURGEIO.ΑΓΡΟΤΙΚΗΣ.49_3
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,.194
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,.194_17
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,.194_27
UPOURGEIO.ΑΝΑΠΤΥΞΗΣ,.194_4
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.205
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.205_11
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.63
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.63_10_sizitisi
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.63_14_sizitisi
UPOURGEIO.ΔΙΚΑΙΟΣΥΝΗΣ,.63_4
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ.221
UPOURGEIO.ΔΙΟΙΚΗΤΙΚΗΣ.221_16_sizitisi
UPOURGEIO.ΕΞΩΤΕΡΙΚΩΝ.82
UPOURGEIO.ΕΞΩΤΕΡΙΚΩΝ.82_19_sizitisi
UPOURGEIO.ΕΡΓΑΣΙΑΣ.233
UPOURGEIO.ΕΡΓΑΣΙΑΣ.233_12
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_16
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_2
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_26
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_36
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_46
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_60
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_69
UPOURGEIO.ΕΣΩΤΕΡΙΚΩΝ.314_81
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.352
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.352_11
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.352_2
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.352_27_sizitisi
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.352_38
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.125
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.125_15
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.125_2
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.125_33
UPOURGEIO.ΟΙΚΟΝΟΜΙΚΩΝ.125_43
UPOURGEIO.ΠΑΙΔΕΙΑΣ,.136
UPOURGEIO.ΠΑΙΔΕΙΑΣ,.136_11
UPOURGEIO.ΠΑΙΔΕΙΑΣ,.364
UPOURGEIO.ΠΑΙΔΕΙΑΣ,.364_12
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.158
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.158_15_sizitisi
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.158_22
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.158_4
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.388
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.388_11
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.388_24
UPOURGEIO.ΠΕΡΙΒΑΛΛΟΝΤΟΣ,.388_4
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ.167
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ.167_9_psifisi
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ.400
UPOURGEIO.ΠΡΟΣΤΑΣΙΑΣ.400_12
UPOURGEIO.ΥΠΟΔΟΜΩΝ,.409
UPOURGEIO.ΥΠΟΔΟΜΩΝ,.409_9

[ergoil]

36 γραμμές, 114 λέξεις, 761 χαρακτήρες εκτελέσιμο, πολλές μου φαίνονται!
μπορεί κάποιος να το γράψει σε οποιαδήποτε γλώσσα χρησιμοποιώντας λιγότερους χαρακτήρες;

[baskin]

Διορθώσεις και προσθήκες, παρακαλώ, πέρασα κάποια πράγματα στα γρήγορα.

[ergoil]

Διορθώσεις και προσθήκες, παρακαλώ, πέρασα κάποια πράγματα στα γρήγορα.

ωραία!
και τώρα τι κάνουμε; περιμένουμε το θεό να βρέξει μυαλά και κρατάμε ομπρέλες;

Για να πάρουν στα σοβαρά οι γνώστες το pirategov, πρέπει να συζητήσουμε, εκτός από την δυνατότα εισαγωγής στο σύστημα με ένα απλό login-password, και πως θα υποστηριχτεί και μια υποδομή ΠΥΠ.