Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Want to renew your passport in Italy? Try to find out how...

by bronto (Priest)
on Dec 15, 2004 at 16:31 UTC ( #415099=poem: print w/replies, xml ) Need Help??

<sad>This "poem" has come to my mind this morning, when I unsuccesfully tried to renew my passport and I have been running around in circles in my town without any useful result. This doesn't compile and hence doesn't run; in fact, I don't have my password renewed, yet. Try to run it after a month or two it has been posted, maybe I'll have my passport renewed and, then, it will work...</sad>

About the Can't locate in @INC complain: that's because I lost it all this morning, if you can find it and provide some, you are welcome

#!/usr/bin/perl use patience ; use Bronto ; use Phone::Mobile ; my $self = Bronto->new ; my $phone = $self->get("phone") ; my $dad = $self->call("dad", using => $phone) ; my $reply = $dad->ask("how do I renew my passport?") ; # At this point $reply holds the value # "There are new dispositions, go to the Carabinieri and ask them to r +enew it" alarm $at_7_am ; sleep $all_night ; # alarm rings now... $bronto->have("shower") ; $bronto->have("breakfast") ; $bronto->goto("carabinieri") ; $reply = $bronto->ring("carabinieri") ; # $reply now holds # "Call forwarded"... what? Forwarded... why? $reply = $bronto->wait ; # $reply holds: "They open at 10" $reply = $bronto->say("But I read 8:00 - 22:00 here") ; # $reply holds: "It changed months ago" $reply = $bronto->localtime ; # 8:45 $bronto->goto("home") and sleep $until_10_am ; $bronto->goto("carabinieri") ; $reply = $bronto->ask("I have to renew my passport") ; # $reply is now: "Sit down here, please" ; sleep $ten_minutes ; # $reply is now: "You have to ask to the City Police, not us"; # Do you wonder how it happened? Can't say. Maybe the carabiniere # had a reference to $reply at hand... $bronto->goto("city police") ; $reply = $bronto->ask("I have to renew my passport") ; # $reply is "Not us, try at the city records office" $bronto->goto("downstairs") ; $reply = $bronto->ask("I have to renew my passport") ; # $reply is "Go to the main police station in Cagliari" $reply = $bronto->feels ; # $reply is "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARRRRGHHHHH!!!" $bronto->watch(movie => '') and learn_lesson() ;


In theory, there is no difference between theory and practice. In practice, there is.

Replies are listed 'Best First'.
Re: Want to renew your passport in Italy? Try to find out how...
by ZlR (Chaplain) on Dec 15, 2004 at 20:54 UTC
    eh ! an obscure movie reference, is it not ?
    ils sont fous ces romains ;)
Re: Want to renew your passport in Italy? Try to find out how...
by nimdokk (Vicar) on Dec 16, 2004 at 11:56 UTC
    Hmm, I read something similar by Umberto Eco, although that was about renewing a Driver's Licence I think :-)
Re: Want to renew your passport in Italy? Try to find out how...
by giulienk (Curate) on Dec 22, 2004 at 11:19 UTC

    Nice poetry :) And that one is a great movie i forgot to vote on, 8/10 for me.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://415099]
Approved by kutsu
Front-paged by kutsu
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2016-10-22 00:37 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (291 votes). Check out past polls.