File: Maybe.pm

package info (click to toggle)
libperlx-maybe-perl 1.202-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 184 kB
  • sloc: perl: 155; makefile: 2
file content (66 lines) | stat: -rw-r--r-- 1,164 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
use 5.006;
use strict;
use warnings;

use PerlX::Maybe qw//;

package Syntax::Feature::Maybe;

BEGIN {
	our $AUTHORITY = 'cpan:TOBYINK';
	our $VERSION   = '1.202';
}

sub install
{
	my ($class, %args) = @_;
	my $into = delete($args{into});
	
	foreach my $f (qw/maybe/)
	{
		no strict 'refs';
		*{"$into\::$f"} = \&{"PerlX::Maybe::$f"};
	}
}

__FILE__
__END__

=pod

=encoding utf8

=head1 NAME

Syntax::Feature::Maybe - use syntax qw/maybe/

=head1 DESCRIPTION

Tiny shim between L<PerlX::Maybe> and L<syntax>.

=head1 BUGS

Please report any bugs to
L<http://rt.cpan.org/Dist/Display.html?Queue=PerlX-Maybe>.

=head1 SEE ALSO

L<PerlX::Maybe>, L<syntax>.

=head1 AUTHOR

Toby Inkster E<lt>tobyink@cpan.orgE<gt>.

=head1 COPYRIGHT AND LICENCE

This software is copyright (c) 2012-2013 by Toby Inkster.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=head1 DISCLAIMER OF WARRANTIES

THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.