1Devel::PatchPerl::HintsU(s3e)r Contributed Perl DocumentaDteivoenl::PatchPerl::Hints(3)
2
3
4

NAME

6       Devel::PatchPerl::Hints - replacement 'hints' files
7

VERSION

9       version 2.08
10

SYNOPSIS

12         use Devel::PatchPerl::Hints;
13
14         if ( my $content = Devel::PatchPerl::Hints->hint_file() ) {
15           chmod 0644, 'hints/netbsd.sh' or die "$!";
16           open my $hints, '>', 'hints/netbsd.sh' or die "$!";
17           print $hints $content;
18           close $hints;
19         }
20
21         # Get a list of OS for which we have hints
22
23         my @os = Devel::PatchPerl::Hints->hints();
24

DESCRIPTION

26       Sometimes there is a problem with Perls "hints" file for a particular
27       perl port. This module provides fixed "hints" files encoded using
28       "MIME::Base64".
29

FUNCTION

31       The function is exported, but has to implicitly imported into the
32       requesting package.
33
34         use Devel::PatchPerl::Hints qw[hint_file];
35
36       It may also be called as a class method:
37
38         use Devel::PatchPerl::Hints;
39
40         my $content = Devel::PatchPerl::Hints->hint_file();
41
42       "hint_file"
43           Takes an optional argument which is the OS name ( as would be
44           returned by $^O ).  By default it will use $^O.
45
46           In a scalar context, Will return the decoded content of the "hints"
47           file suitable for writing straight to a file handle or undef list
48           if there isn't an applicable "hints" file for the given or derived
49           OS.
50
51           If called in a list context, will return a list, the first item
52           will be the name of the "hints" file that will need to be amended,
53           the second item will be a string with the decoded content of the
54           "hints" file suitable for writing straight to a file handle.
55           Otherwise an empty list will be returned.
56
57       "hints"
58           Takes no arguments, returns a list of OS names for which there are
59           "hints" files.
60

AUTHOR

62       Chris Williams <chris@bingosnet.co.uk>
63
65       This software is copyright (c) 2021 by Chris Williams and Marcus
66       Holland-Moritz.
67
68       This is free software; you can redistribute it and/or modify it under
69       the same terms as the Perl 5 programming language system itself.
70
71
72
73perl v5.32.0                      2021-01-13        Devel::PatchPerl::Hints(3)
Impressum