#!perl
use strict;
use warnings;
use Test::More;

my $input_value = '02/08/2018';
my $desired_value = '2/8/2018';

# do stuff with input value:
my $transformed_value = $input_value;
$transformed_value =~ s!0!!g; # remove all zeroes

is $transformed_value, $desired_value, "Conversion strips leading zeroes";

done_testing;