Newsgroup: it.comp.lang.perl
Titolo: Maypole

Vorrei installare (ma non ci sto' riuscendo) Maypole
C'e' qualche italiano che lo usa e puo' darmi qualche consiglio?
Un saluto a tutto il gruppo.
Andrea

 Vorrei installare (ma non ci sto' riuscendo) Maypole
Che problemi stai avendo?
(Per favore specifica anche il SO, la distribuzione e la versione del 
perl che stai usando).

 C'e' qualche italiano che lo usa e puo' darmi qualche consiglio?
Non ti conviene cominciare direttamente con Catalyst ? 
E` partito da una costola di Maypole, e che io sappia
e` molto piu` mantenuto e aggiornato.
s.
-- 
Stefano Rodighiero      |  
http://www.stefanorodighiero.net
mailto:
lar...@perl.it
   |  Italian Perl Mongers: 
http://www.perl.it

 Che problemi stai avendo?
Una curiosit�: ma perch� sul sito di Maypole compaiono qua e l� link a siti
di "female viagra" o di "drugs"? Mi sa che qualcuno lo sta aggiornando
all'insaputa dei creatori originari.
Max

Max M. wrote:

Direi che hai ragione.
� un wiki (Kwiki) ad accesso libero: basta creare una username e si 
possono editare le pagine a proprio piacimento.
L'ho appena fatto ed ho cancellato lo spam nella home page. Non so fin 
quando durer�, ma per adesso non c'� pi�:
http://maypole.perl.org/?HomePage
Le pagine interne sono invece ancora da ripulire: se ci sono volontari...
Per essere degli spammer/defacer, tutto sommato sono stati abbastanza 
civili :-)

Oh!! Che piacere sapere che qualcuno puo' darti una mano!
Mi interessa Maypole, perche' mi e' piaciuto il fatto che l'utente puo' 
utilizzare un CRUD senza scrivere nulla di nuovo. Crea le tabelle e via.
Catalyst ho paura che sia troppo complicato, almeno per quel che voglio 
fare io!
Passiamo all'installazione... Ho la SuSE 10.1 con Apache2. Ho appena 
installato tramite cpan l'ultima Maypole + esempio BeerDB.
Ho creato le tabelle con Sqlite con l'es: beerdb.sql
Ho dato i seguenti comandi:
cd /root/.cpan/build/Maypole-2.13/examples/
cp BeerDB.pm /usr/lib/perl5/5.8.8/
mkdir /srv/www/beer
cd ..
cp -R t /srv/www/beer/
cd lib/Maypole
cp -R templates/factory /srv/www/beer/
chown -R wwwrun.www /srv/www/beer
l /srv/www/beer
-rwxrwxrwx 1 wwwrun www 6144 Jul  8 06:37 beerdb.db*
drwxr-xr-x 2 wwwrun www  432 Jul 29 10:37 factory/
drwxr-xr-x 3 wwwrun www  512 Jul 29 10:34 t/
mkdir /srv/www/cgi-bin/maypole
vi /srv/www/cgi-bin/maypole/beer.cgi
#!/usr/bin/perl
use lib '/srv/www/beer/';
use BeerDB;
BeerDB->run();
:q
--------------
Ho provato a inserire dentro httpd.conf Location ma non riparte il 
server. Allora o provato a aggiungere a:
vi /etc/apache2/conf.d/mod_perl.conf
ScriptAlias /beer/ "/srv/www/beer/"
<Perl>
#   use lib '/srv/www/beer';
    use lib '/root/.cpan/build/Maypole-2.13/lib/';
</Perl>
<Location /beerdb>
    SetHandler perl-script
    PerlHandler BeerDB
</Location>
</IfModule>
:q
--------------------------
Dentro a /usr/lib/perl5/5.8.8/BeerDB.pm o modificato:
use constant DATASOURCE => '/srv/www/beer/beerdb.db';
e
BeerDB->config->uri_base( $ENV{BEERDB_BASE} || "
http://localhost/beer/
" );
Sul mozzilla ho provato 
http://localhost/beer/
 ma niente.
Con 
http://localhost/cgi-bin/maypole/beer.cgi
risponde pagina bianca con la sola scritta:
This is the frontpage
Non ho le idee molto chiare, vi prego di scusarmi sulla lunghzz del mess.
Spero che possiate schiarirmi.
Ciao
Andrea


 fare io!
Per il CRUD "senza scrivere nulla di nuovo" controlla anche 
il progetto Jifty.


arf wrote:

OK, forse hai fatto qualche operazione inutile, ma dovrebbe essere tutto 
  a posto: probabilmente � solo che non trova i template (giusti).
Copia tutta la dir:
/root/.cpan/build/Maypole-2.13/lib/Maypole/templates
dove preferisci sotto la document root di Apache, ad es.:
/srv/www/beer/
e ovviamente:
chown -R wwwrun.www /srv/www/beer/templates
(cancella eventuali altri template, se avevi ad es. copiato quelli sotto 
example/).
Quindi apri BeerDB.pm e cambia l'assegnazione a @root in:
my @root = ('/srv/www/beer/templates');
All'inizio prova col cgi:
http://localhost/cgi-bin/maypole/beer.cgi
e se va, poi passi a mod_perl.
Facci sapere.

 Facci sapere.
Ok, sono riuscito a fare andare qualcosa...
Riesco ad inserire anche 'le birre'.
Ma non riesco a configurare i link ad esempio per mettere in ordine una 
colonna.
Mi indirizza a qualcosa del genere:
http://localhost/cgi-bin/maypole/http://localhost/cgi-bin/maypole/beer.cgi/brewery/list/?order=name&page=1
Sembra una semplice doppia assegnazione, ma non riesco ad individuarla.
--------------------------------------
A proposito...Sono giusto come locazione dei file?
BeerDB->config->uri_base( $ENV{BEERDB_BASE} || 
"/cgi-bin/maypole/beer.cgi" );
con
dhcppc0:/srv/www/cgi-bin/maypole # find .
./BeerDB
./BeerDB/Base.pm
./BeerDB/Beer.pm
./BeerDB/Drinker.pm
./BeerDB/Brewery.pm
./BeerDB.pm
./BeerDB.pm~
./beer.cgi
./beer.cgi~
./beerdb.db
./beerdb.sql
./
BeerDB.pm.org
--------------------------------------
my @root=  ('/srv/www/htdocs/beer/');
con
dhcppc0:/srv/www/htdocs/beer # find .
./edit
./list
./view
./frontpage
./login
./pager
./title
./maypole
./addnew
./footer
./header
./macros
./navbar
./search_form
./maypole.css
--------------
Jifty sembra interessante... Ho provato anche ad installarlo una volta 
ma mi ha chiesto un centinaio di moduli... Si blocca sui 'test' e non 
sono riuscito ad andare avanti. (a proposito come si cancellano i moduli 
che non servono?) Di Maypole mi piace anche il fatto che non si debba 
installare troppe cose.
Grazie per l'aiuto, se passate dalle mie parti...Vorrei offrivi un caffe'.
Ciao
Andrea

...E dai rispondetemi!
Almeno sul percorso dei file.
Un saluto al gruppo piu' interessante del mondo!
Ciao
Andrea


Mi rispondo da solo... Caso mai se qualcuno fosse interessato a Maypole.
Per iniziare ho voluto installare tutto nella cgi-bin con sqlite 
mettendo la semplicita' come verbo.
CPAN
install Maypole
install Maypole::Application
install Class::DBI::Loader
install Template::Plugin::Class
install Class::DBI::SQLite
mkdir /srv/www/cgi-bin/maypole
cd /srv/www/cgi-bin/maypole/
vi beer.cgi
--------------
#!/usr/bin/perl
use lib '/srv/www/beer/';
use BeerDB;
BeerDB->run();
--------------
:q
cp -R /home/arf/tmp/2009/30/Maypole-2.13/examples/fancy_example/BeerDB 
BeerDB
cp -R /home/arf/tmp/2009/30/Maypole-2.13/lib/Maypole/templates templates
l templates/
 > beer/
 > factory/
cp /home/arf/tmp/2009/30/Maypole-2.13/examples/BeerDB.pm .
cp /home/arf/tmp/2009/30/Maypole-2.13/examples/beerdb.sql .
# se usi SQLITE in vece di mysql:
perl -ne 's/auto_increment/autoincrement/g; print ' beerdb.sql
sqlite3 beerdb.db
sqlite> .read beerdb.sql
vi BeerDB.pm
use constant DATASOURCE => 'beerdb.db';
-
-
BeerDB->config->uri_base( $ENV{BEERDB_BASE} || '/cgi-bin/maypole/beer.cgi');
-
-
my @root=  ('templates');
:q
vi templates/factory/macros
# delete at line 21 '    lnk = lnk | uri ;'
END
Ciao
Andrea
