use 5.028;
use warnings;
use Venus::Number;
use File::Temp;

my $n;

# These two come with warnings
say Venus::Number->new($n);                      # ''
say Venus::Number->new($n,$n);                   # 0

$n = 1;
say Venus::Number->new($n);                      # 1

$n = "abc";
say Venus::Number->new($n);                      # abc

$n = [3,2,1];
say Venus::Number->new($n);                      # ARRAY(0x...)
say Venus::Number->new($n)->abs;                 # 94653281131368

$n = File::Temp->new;
say Venus::Number->new($n);                      # /tmp/ER2Mi14BOz