Mega Code Archive

 

Categories / Perl / File

 

Uses pl to read all pl files in current directory

#!/usr/bin/perl -w @list = <*.pl>; print ".pl files: @list";