NAME

 Scalar::LockRefType - simple scalar type checker

SYNOPSIS

 use Scalar::LockRefType;

 tie my $h1 => 'Scalar::LockRefType', {};
 tie my $h2 => 'Scalar::LockRefType', 'HASH';
 tie my $h3 => 'Scalar::LockRefType';

 $h1 = [];  # dies, violates the type
 $h2 = [];  # dies, violates the type

 $h3 = {};  # sets the type
 $h3 = [];  # dies

DESCRIPTION

This little module allows you to tie the type of a scalar to a specified reference type. If the refererence type of an assignment violates the tied type, the assignment throws an exception.

AUTHOR

Heiko Schlittermann <hs@schlittermann.de>