skip test if db doesn't have null key support
[p5sagit/p5-mst-13.2.git] / lib / open.pm
CommitLineData
d1edabcf 1package open;
2
3=head1 NAME
4
5open - perl pragma to set default disciplines for input and output
6
7=head1 SYNOPSIS
8
9 use open IN => ":any", OUT => ":utf8"; # unimplemented
10
11=head1 DESCRIPTION
12
13NOTE: This pragma is not yet implemented.
14
15The open pragma is used to declare one or more default disciplines for
16I/O operations. Any constructors for file, socket, pipe, or directory
17handles found within the lexical scope of this pragma will use the
18declared default.
19
20Handle constructors that are called with an explicit set of disciplines
21are not influenced by the declared defaults.
22
23The default disciplines so declared are available by the special
24discipline name ":def", and can be used within handle constructors
25that allow disciplines to be specified. This makes it possible to
26stack new disciplines over the default ones.
27
28 open FH, "<:para :def", $file or die "can't open $file: $!";
29
30=head1 SEE ALSO
31
32L<perlunicode>, L<perlfunc/"open">
33
34=cut
35
361;