论坛 › Perl › Perl Poetry .

buhong 发表于 2015-12-28 12:56:33

Perl Poetry .

　　#!/usr/bin/perl   
　　APPEAL:   
　　listen (please, please);   
　　open yourself, wide;      
　　join (you, me),   
　　connect (us,together),   
　　tell me.   
　　do something if distressed;      
　　@dawn, dance;      
　　@evening, sing;      
　　read (books,$poems,stories) until peaceful;      
　　study if able;      
　　write me if-you-please;   
　　sort your feelings, reset goals, seek (friends, family, anyone);         
　　do*not*die (like this)         
　　if sin abounds;   
　　keys (hidden), open (locks, doors), tell secrets;   
　　do not, I-beg-you, close them, yet.                              
　　accept (yourself, changes),                              
　　bind (grief, despair);   
　　require truth, goodness if-you-will, each moment;   
　　select (always), length(of-days)   
　　# listen (a perl poem)   
　　# Sharon Hopkins   
　　# rev. June 19, 1995
　　Perl Poetry

http://image.juziyue.com/WebStoryLogo32.png 菊子曰：很好用的博客离线工具！

查看完整版本: Perl Poetry .