The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl

use strict;
use warnings;

use Dist::Zilla::Tester;
use Path::Class;
use Test::More tests => 1;

# build fake dist
my $tzil =
  Dist::Zilla::Tester->from_config( { dist_root => dir(qw(t test-fixme)), } );

my $tempdir       = $tzil->tempdir;
my $sourcedir     = $tempdir->subdir('source');
my $builddir      = $tempdir->subdir('build');
my $expected_file = $builddir->subdir('xt')->subdir('release')->file('fixme.t');

chdir $sourcedir;

$tzil->build;

END {    # Remove (empty) dir created by building the dists
    require File::Path;
    my $tmp = $tempdir->parent;
    chdir $tmp->parent;
    File::Path::remove_tree( $tmp, { keep_root => 0 } );
}

ok( -e $expected_file, 'test created' );