If you want to generate user documentation from POD in Perl should add at the bottom of script this section - after keyword __END__(this is only example - I use this schema for my documentation):
print "hello world!\n";
# end of script
# TAGS IN PERLDOC:
# *PROGNAME* - replace with program name
# *SHORT_DESCRIPTION* - one sentence description
*PROGNAME* - *SHORT_DESRIPTION*.
=head1 REQUIRED ARGUMENTS
=item B<-v, --verbose>
=item B<-d, --debug>
Be even more verbose - information specifig for debugging
=item B<-h, --help>
Display short usage help and exit
*PROGNAME* was designed for *PURPOSE*
=item B<perl 5.6> or newer with standard modules
=head1 BUGS AND LIMITATIONS
You are welcome to send bug reports about *PROGNAME* to my ema…
Update:Currently list is longer than 35 projects, during change from Polish to English I have added one new project - and this is why title says 35 instead 34 ;). After updates there are even more!
Sorry for your confusion.
Google is one of the biggest companies supporting OpenSource movement, they released more than
500 open source projects(most of them are samples showing how to use their API).
In this article I will try to write about most interesting and free releases from Google, some of them might be abandoned.
Update:List of projects developed at Google and released as opensource (thanks @dobs from reddit) can be displayed also hereText File processingGoogle CRUSH (Custom Reporting Utilities for SHell)CRUSH is a collection of tools for processing delimited-text data from the command line or in shell scripts.
Tutorial how to use it is hereC++ libraries and sourcesGoogle BreakpadAn open-source multi-…
When I work on Windows I use Activesite Active Perl to do some stuff.
Recently I had to copy about 60 files from large directory structure to a new place (about 800 files in nasty directory structure).
It was rather boring stuff to do, so I used perl to finish job because it would be
pretty easy task to do using hashes (I had names of files given in text file). Unfortunately I had some problems on completion of job,
because there was a problem with encoding of file path name on Windows.Below I provide simple script demonstration how to handle national characters in path using perl on Windows.#!/usr/bin/perl
# Win32::Codepage::Simple is available in ActiveState Perl
use Win32::Codepage::Simple qw(get_codepage get_acp);
binmode STDOUT, ":utf8";
binmode STDERR, ":utf8";
my $dir = "./copy_from_here/";
my $dest = "./copy_here/…