package Scope::OnExit;
$Scope::OnExit::VERSION = '0.03';
use strict;
use warnings;
use Exporter 5.57 'import';
use XSLoader;

XSLoader::load(__PACKAGE__, __PACKAGE__->VERSION);

##no critic ProhibitAutomaticExportation
our @EXPORT = qw/on_scope_exit/;

1;    # End of Scope::OnExit

#ABSTRACT: DEPRECATED Running code on scope exit



=encoding UTF-8

=head1 NAME

Scope::OnExit - DEPRECATED Running code on scope exit

=head1 VERSION

version 0.03


Execute code on scope exit

    use Scope::OnExit;

	my $var = foo();
	on_scope_exit { do_something($var) };
	} # scope exit, do_something($var) is run now.

Note that Feature::Compat::Defer provides a much better way to do this. Unless you need compatibility with perls older than 5.14, I highly recommend using that instead.


=head2 on_scope_exit { block }

This will make the block run at scope exit. 

=head1 AUTHOR

Leon Timmermans <>


This software is copyright (c) 2009 by Leon Timmermans.

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