sub mdtm {
    my $ftp  = shift;
    my $file = shift;
    return $ftp->_MDTM($file) || undef;
}