diff options
Diffstat (limited to 'devel/p5-Syntax-Keyword-Defer/pkg-descr')
-rw-r--r-- | devel/p5-Syntax-Keyword-Defer/pkg-descr | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/devel/p5-Syntax-Keyword-Defer/pkg-descr b/devel/p5-Syntax-Keyword-Defer/pkg-descr new file mode 100644 index 000000000000..536bda5936f1 --- /dev/null +++ b/devel/p5-Syntax-Keyword-Defer/pkg-descr @@ -0,0 +1,14 @@ +This module provides a syntax plugin that implements a block which executes +when the containing scope has finished. + + use Syntax::Keyword::Defer; + + { + my $dbh = DBI->connect( ... ) or die "Cannot connect"; + defer { $dbh->disconnect; } + + my $sth = $dbh->prepare( ... ) or die "Cannot prepare"; + defer { $sth->finish; } + + ... + } |