comment on

I've collected hundreds of tiny snippets from books and tutorials, and an especially large number from Perl Monks. These all go into an "examples" directory. Listed, is the script I use to browse those snippets (pardon the several clues that this is only used on a Linux box).

I usually start it with a negative number as the argument, since the snippets are sorted in the directory with the most recent last.

Don't be insulted by the babytalk Perl. "Everybody's got to start somewhere" and this is unapologetically a beginner's work. Consequently, if you're going to vote it down for being stupid or boring, I'd appreciate a lecture on what's wrong.
Positive comments also welcome!
mkmcconn

#!/usr/bin/perl -w
use strict;
my $index = @ARGV ? $ARGV[0]:1;
STUDY: 
for (my @files=(glob "$ENV{HOME}/$ENV{SANDBOX}/examples/*")){
print "$files[$index] \n";
open (SCRIPT,"< $files[$index]") 
  or warn "can't open file: $!";
    print while <SCRIPT>;
    do $files[$index];
    print "type [N]EXT to continue browsing examples,
      or another key to repeat the snippet__  "; 
    redo STUDY unless <> =~ /^[Nn]/;
    $index++;
}
[download]

In reply to snippet browser by mkmcconn

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


There's more than one way to do things
	PerlMonks