>>>>> "Junio" == Junio C Hamano <junkio@xxxxxxx> writes:
Junio> About vger potentially throwing things away, I use this script
Junio> (called "taboo.perl") to check my messages before sending them
Junio> out.
Junio> Obviously the taboo-word list itself is not attached here, but
Junio> the actual script should have a copy of it after the __DATA__
Junio> marker.
With "Inline::Files" from the CPAN, you could have a switch where the
script updates itself with the new list:
use Inline::Files;
if (@ARGV == 1 and $ARGV[0] eq "-update") {
use LWP::Simple;
my $list = get "http://example.com/foo/bar.txt";;
open DATA, ">$DATA" or die "cannot write myself: $!";
print DATA $list;
close DATA;
exit 0;
}
... rest of your program here ...
... read using <DATA> as before ...
__DATA__
the list will magically go here.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@xxxxxxxxxxxxxx> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
-
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at http://vger.kernel.org/majordomo-info.html