use strict;
use warnings;

use Test::More tests => 1;

my $have = 'a:b:';
my $want = 'a:b';

chop $have;

is $have, $want;