1#!/usr/bin/env perl
2
3use strict;
4use warnings;
5
6use Test::More tests => 14;
7use FindBin qw($Bin);
8use lib "$Bin/lib";
9
10use Versioned;
11
12{
13    use autobox UNIVERSAL => 'Versioned';
14    my $want = '0.42';
15
16    is 42->autobox_class->test, $want;
17    is 42->autobox_class->VERSION, $want;
18    is 3.1415927->autobox_class->test, $want;
19    is 3.1415927->autobox_class->VERSION, $want;
20    is ''->autobox_class->test, $want;
21    is ''->autobox_class->VERSION, $want;
22    is 'Hello, world!'->autobox_class->test, $want;
23    is 'Hello, world!'->autobox_class->VERSION, $want;
24    is []->autobox_class->test, $want;
25    is []->autobox_class->VERSION, $want;
26    is {}->autobox_class->test, $want;
27    is {}->autobox_class->VERSION, $want;
28    is sub {}->autobox_class->test, $want;
29    is sub {}->autobox_class->VERSION, $want;
30}
31