Select Code to Download

% which perl
/usr/bin/perl

use strict;
use warnings;

...
            or warn "can't delete $test_data[$_]{name}";
    }
}