#!/usr/bin/perl
use strict;
use warnings;
use Test::More 'no_plan';
use Tester;

Tester->set_one(1);
my $one = Tester->get_one();
Tester->set_one(2); # Try to set this for the next test
Test::More::is( $one, 1, 'One equals to one' );