diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-08-04 12:47:34 +0100 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-08-04 12:47:34 +0100 |
commit | dee28d0dbca2d9719243e3e17392dcd12d011104 (patch) | |
tree | 6371af9b1f7fa30075717e57adb8ba436d534e89 /cpan | |
parent | ce7ce09736ea27007b926de51e1f44c473ea79e5 (diff) | |
download | perl-dee28d0dbca2d9719243e3e17392dcd12d011104.tar.gz |
Update perlfaq to CPAN version 5.0150045
[DELTA]
5.0150045 Sun 3 Aug 2014 18:16:06 +0100
* Improve example, use File::Spec (Brian Fraser)
* Typo in perlfaq7 (Rares Aioanei, via shlomif)
* Typo in perlfaq1 (Xaerxess)
Diffstat (limited to 'cpan')
-rw-r--r-- | cpan/perlfaq/lib/perlfaq.pm | 5 | ||||
-rw-r--r-- | cpan/perlfaq/lib/perlfaq1.pod | 2 | ||||
-rw-r--r-- | cpan/perlfaq/lib/perlfaq5.pod | 6 | ||||
-rw-r--r-- | cpan/perlfaq/lib/perlfaq7.pod | 2 |
4 files changed, 7 insertions, 8 deletions
diff --git a/cpan/perlfaq/lib/perlfaq.pm b/cpan/perlfaq/lib/perlfaq.pm index 6d6a05a75e..9a64d66284 100644 --- a/cpan/perlfaq/lib/perlfaq.pm +++ b/cpan/perlfaq/lib/perlfaq.pm @@ -1,6 +1,3 @@ package perlfaq; -{ - $perlfaq::VERSION = '5.0150044'; -} - +$perlfaq::VERSION = '5.0150045'; 0; # not is it supposed to be loaded diff --git a/cpan/perlfaq/lib/perlfaq1.pod b/cpan/perlfaq/lib/perlfaq1.pod index 19eb1edb77..ad390512e0 100644 --- a/cpan/perlfaq/lib/perlfaq1.pod +++ b/cpan/perlfaq/lib/perlfaq1.pod @@ -116,7 +116,7 @@ and an experimental version. The maintenance versions are stable, and have an even number as the minor release (i.e. perl5.18.x, where 18 is the minor release). The experimental versions may include features that don't make it into the stable versions, and have an odd number as the -minor release (i.e. perl5.19.x, where 9 is the minor release). +minor release (i.e. perl5.19.x, where 19 is the minor release). =back diff --git a/cpan/perlfaq/lib/perlfaq5.pod b/cpan/perlfaq/lib/perlfaq5.pod index a2baf16e5c..a8d4478d78 100644 --- a/cpan/perlfaq/lib/perlfaq5.pod +++ b/cpan/perlfaq/lib/perlfaq5.pod @@ -431,8 +431,10 @@ temporary files in one process, use a counter: BEGIN { use Fcntl; - my $temp_dir = -d '/tmp' ? '/tmp' : $ENV{TMPDIR} || $ENV{TEMP}; - my $base_name = sprintf "%s/%d-%d-0000", $temp_dir, $$, time; + use File::Spec; + my $temp_dir = File::Spec->tmpdir(); + my $file_base = sprintf "%d-%d-0000", $$, time; + my $base_name = File::Spec->catfile($temp_dir, $file_base); sub temp_file { my $fh; diff --git a/cpan/perlfaq/lib/perlfaq7.pod b/cpan/perlfaq/lib/perlfaq7.pod index bd6c102dae..3c5ab8415b 100644 --- a/cpan/perlfaq/lib/perlfaq7.pod +++ b/cpan/perlfaq/lib/perlfaq7.pod @@ -201,7 +201,7 @@ transfer the module to you. If you can not reach the author for some reason contact the PAUSE admins at modules@perl.org who may be able to help, -but each case it treated separately. +but each case is treated separately. =over 4 |