标题: [分享]一首名为LISTEN的PERL诗歌 [打印本页]

---

作者: cnangel    时间: 2004-8-7 14:21     标题: [分享]一首名为LISTEN的PERL诗歌

这是Sharon Hopkins在1995，6，19发表的。现帖上供大家欣赏。

1. #!/usr/bin/perl
2. APPEAL:
3. listen(please,please);
4. open yourself,wide;
5.    join(you,me),
6. connect(us,together),
7. tell me.
8. do something if distressed;
9. @dawn,dance;
10. @evening,sing;
11. read(books,$poems,stories) until peaceful;
12. study if able;
14. sort your feelings,reset goals,seek(friends,family,anyone);
15.    
16.    do*not*die(like this)
17.    if sin abounds;
18. keys (hidden),open (locks,doors),tell secrets;
19. do not,I-beg-you,close them,yet.
20.    accept(yourself,changes),
21.    bind(grief,despair);
22. require truth,goodness if-you-will,each moment;
23. select (always),length(of-days)

复制代码

---

欢迎光临 星星博客 (http://commerce.huhoo.net/)

Powered by Discuz! 7.0.0