#!/usr/bin/env perl

use strict;
use warnings;

use Test::More tests => 3;

ok(-e '/Users/ken/tmp/Sample Music', 'Single quotes');
ok(-e "/Users/ken/tmp/Sample Music", 'Double quotes');
ok(-e "'/Users/ken/tmp/Sample Music'", 'Single quotes in double quotes');

##</code><code>##

1..3
ok 1 - Single quotes
ok 2 - Double quotes
not ok 3 - Single quotes in double quotes
#   Failed test 'Single quotes in double quotes'
#   at ./pm_example.pl line 10.
# Looks like you failed 1 test of 3.