This perl script generates a 50,000+ novel about how we celebrate Thanksgiving in Puerto Rico.
Huge thanks to Nick Montfort, who provided the inspiration with his Nano-NaNoGenMo spinoff concept, which lowered the technical bar enough for me to adapt Milton Läufer's code for "A Plot."
Here's the code:
perl -e 'sub n{(split/ /,"arroz-con-gandules pasteles jamón vino cerveza coquito pavo mofongo mamposteao amarillos tostones sangría lechón pernil flan ensalada")[rand 16]}print"Sanguivin en 🇵🇷\n\nHabía ".n;for(;$i<25000;$i++){print" y ".n}print" y más.\n"'
Había vino y sangría y vino y pavo y jamón y pernil y jamón y cerveza y pasteles y tostones y amarillos y lechón y tostones y cerveza y pavo y mamposteao y mamposteao y jamón y ensalada y coquito y jamón y pavo y lechón y sangría y ensalada y pasteles y sangría y pernil y cerveza y pernil y flan y mofongo y amarillos y vino y pasteles y sangría y pavo y pasteles y lechón y flan y jamón y lechón y vino y jamón y jamón y arroz-con-gandules y ensalada y flan y cerveza y sangría y coquito y cerveza y jamón y ensalada y arroz-con-gandules y pasteles y amarillos y coquito y flan y sangría y arroz-con-gandules y mofongo y amarillos y sangría y lechón y sangría y cerveza y vino y coquito y cerveza y pavo y pernil y lechón y vino y mofongo y arroz-con-gandules y coquito y pasteles y jamón y sangría y mofongo y jamón y pernil y sangría y vino y amarillos y mamposteao y mamposteao y coquito y arroz-con-gandules y flan y tostones y tostones y mofongo y lechón y vino y flan y mamposteao y lechón y mofongo y pavo y tostones y mamposteao y jamón y mamposteao y tostones y lechón y mofongo y lechón y mofongo y vino y jamón y amarillos y arroz-con-gandules y vino y pasteles y pavo y flan y amarillos y lechón y jamón y pavo y cerveza y jamón y pernil y mamposteao y mamposteao y lechón y jamón y arroz-con-gandules y coquito y mofongo y vino y lechón y lechón y arroz-con-gandules y coquito y pavo y amarillos y lechón y coquito y sangría y ensalada y mamposteao y mofongo y sangría y mofongo y coquito y pavo y vino y jamón y cerveza y tostones y flan y pavo y sangría y coquito y lechón y pernil y coquito y jamón y amarillos y sangría y pavo y lechón y sangría y jamón y sangría y arroz-con-gandules y lechón y lechón y coquito y flan y flan y arroz-con-gandules y arroz-con-gandules y amarillos y lechón y pernil y ensalada y pavo y tostones y tostones y arroz-con-gandules y pasteles y coquito y flan y jamón y sangría y mamposteao y cerveza y pernil y vino y lechón y vino y pasteles y vino y tostones y mamposteao y arroz-con-gandules y ensalada y pasteles y coquito y coquito y lechón y mamposteao y mofongo y arroz-con-gandules y lechón y flan y cerveza y mamposteao y pasteles y sangría y jamón y pernil y sangría y cerveza y coquito y vino y coquito y pavo y pavo y pavo y amarillos y amarillos y pavo y jamón y vino y vino y mofongo y coquito y vino y amarillos y ensalada y lechón y mofongo y arroz-con-gandules y mofongo y sangría y cerveza y pasteles y flan y amarillos y sangría y coquito y cerveza y cerveza y sangría y arroz-con-gandules y cerveza y tostones y cerveza y vino y pernil y pasteles y arroz-con-gandules y flan y amarillos y cerveza y cerveza y pavo y pavo y pavo y coquito y flan y arroz-con-gandules y tostones y pasteles y coquito y pernil y mamposteao y sangría y lechón y jamón y sangría y tostones y arroz-con-gandules y flan y tostones y vino y coquito y vino y pasteles y sangría y pernil y vino y flan y pasteles y flan y pavo y mamposteao y amarillos y mamposteao y sangría y amarillos y arroz-con-gandules y coquito y pernil y arroz-con-gandules y lechón y jamón y mamposteao y pernil y tostones y pavo y lechón y pernil y vino y vino y lechón y cerveza y pasteles y vino y jamón y amarillos y mofongo y coquito y amarillos y amarillos y mofongo y arroz-con-gandules y lechón y mofongo y cerveza y vino y pasteles y tostones y ensalada y cerveza y flan y ensalada y cerveza y arroz-con-gandules y jamón y tostones y vino y jamón y tostones y sangría y pavo y pasteles y flan y coquito y flan y amarillos y pavo y vino y sangría y mamposteao y flan y tostones y mofongo y pavo y cerveza y sangría y mamposteao y jamón y coquito y pavo y tostones y tostones y vino y tostones y cerveza y cerveza y mamposteao y pavo y coquito y pernil y pavo y cerveza y arroz-con-gandules y sangría y coquito y arroz-con-gandules y vino y coquito y pavo y lechón y arroz-con-gandules y vino y vino y ensalada y mamposteao y arroz-con-gandules y mofongo
This perl script generates a 50,000+ novel about how we celebrate Thanksgiving in Puerto Rico.
Huge thanks to Nick Montfort, who provided the inspiration with his Nano-NaNoGenMo spinoff concept, which lowered the technical bar enough for me to adapt Milton Läufer's code for "A Plot."
Here's the code:
perl -e 'sub n{(split/ /,"arroz-con-gandules pasteles jamón vino cerveza coquito pavo mofongo mamposteao amarillos tostones sangría lechón pernil flan ensalada")[rand 16]}print"Sanguivin en 🇵🇷\n\nHabía ".n;for(;$i<25000;$i++){print" y ".n}print" y más.\n"'Here's sample output in 3 formats: Sanguivin en 🇵🇷.txt Sanguivin en 🇵🇷.pdf Sanguivin en 🇵🇷.docx
And here's an excerpt:
¡Buen provecho!