devel/p5-Syntax-Keyword-Defer/pkg-descr


1
2
3
4
5
6
7
8
9
10
11
12
13
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; }

          ...
       }