- or download this
use Test::More tests => 1;
...
my $expected = "some/file/path/here";
is( get_a_filename(), $expected );
- or download this
use Test::FilePath tests => 1;
filepath_is( "some/path", "some\path" );
- or download this
my @expected = qw{ some file path here };
is( get_a_filename(), File::Spec->join( @expected ) );
- or download this
my $expected = "some/file/path/here";
filepath_is( "some:file:path:here", $expected );