Perl: Difference between revisions
m added Category:Perl using HotCat |
m Text replacement - "<(\/?)source" to "<$1syntaxhighlight" Tags: Mobile edit Mobile web edit |
||
| Line 2: | Line 2: | ||
http://freephile.com/cms/content/three-virtues-good-programmer | http://freephile.com/cms/content/three-virtues-good-programmer | ||
< | <syntaxhighlight lang="perl"> | ||
@a=(Lbzjoftt, Inqbujfodf, | @a=(Lbzjoftt, Inqbujfodf, | ||
Hvcsjt); $b="Lbssz Wbmm"; | Hvcsjt); $b="Lbssz Wbmm"; | ||
| Line 15: | Line 15: | ||
;}else{ print "$a[$i], "; | ;}else{ print "$a[$i], "; | ||
}}print "\n\t\t--$b\n\n"; | }}print "\n\t\t--$b\n\n"; | ||
</ | </syntaxhighlight> | ||
< | <syntaxhighlight lang="perl"> | ||
#!/usr/bin/perl | #!/usr/bin/perl | ||
| Line 35: | Line 35: | ||
} | } | ||
print "\n\t\t--$b\n\n"; | print "\n\t\t--$b\n\n"; | ||
</ | </syntaxhighlight> | ||
<blockquote> | <blockquote> | ||