package Format::Error::ValueNumericException 0.1;

use 5.008;
use warnings;

use Format::Error;
use base qw(Format::Error);

sub new
{
    my $self = shift;
    $self->SUPER::new(
        -text => qq/Value must be an numeric value/
    );
}
1