#!perl -T
# currently not yet tested. mv is basically exactly the same as rename, except
# it can handle cross-device.
use Test::More;
ok 1;
done_testing;
#!perl -T
# currently not yet tested. mv is basically exactly the same as rename, except
# it can handle cross-device.
use Test::More;
ok 1;
done_testing;