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

use strict;
use warnings;

use Test::More tests => 2;

SKIP:
{
	skip( 'Temporary dashboard id file (deprecated version) does not exist.', 1 )
		if ! -e 'webservice-datadog-dashboard-dashid-deprecated.tmp';

	ok(
		unlink( 'webservice-datadog-dashboard-dashid-deprecated.tmp' ),
		'Remove temporary dashboard id file - deprecated version',
	);
}

SKIP:                                                                           
{                                                                               
  skip( 'Temporary dashboard id file does not exist.', 1 )                      
    if ! -e 'webservice-datadog-dashboard-dashid.tmp';                          
                                                                                
  ok(                                                                           
    unlink( 'webservice-datadog-dashboard-dashid.tmp' ),                        
    'Remove temporary dashboard id file',                                       
  );                                                                            
}