Lines Matching full:copy
9 use File::Copy qw(copy move cp mv);
20 # File::Copy states that all subroutines return '0' on failure.
24 # from File::Copy may not be what's in the documentation.
42 is( $hints->sub_fullname(\©), 'File::Copy::copy' , "Id: copy" );
45 PERL5101 ? 'File::Copy::cp' : 'File::Copy::copy' , "Id: cp"
48 is( $hints->sub_fullname(\&move), 'File::Copy::move' , "Id: move" );
50 PERL5101 ? 'File::Copy::mv' : 'File::Copy::move' , "Id: mv"
54 ok( $hints->get_hints_for(\©)->{scalar}->(0) ,
55 "copy() hints should fail on 0 for scalars."
57 ok( $hints->get_hints_for(\©)->{list}->(0) ,
58 "copy() hints should fail on 0 for lists."
65 use autodie qw(copy);
67 my $scalar_context = copy(NO_SUCH_FILE, NO_SUCH_FILE2);
73 is($@->function, "File::Copy::copy", "Function should be original name");
76 skip("File::Copy is weird on Win32/VMS before 5.10.1", 1)
79 is($@->return, 0, "File::Copy returns zero on failure");
82 is($@->context, "scalar", "File::Copy called in scalar context");
87 use autodie qw(copy);
89 my @list_context = copy(NO_SUCH_FILE, NO_SUCH_FILE2);
95 is($@->function, "File::Copy::copy", "Function should be original name");
98 skip("File::Copy is weird on Win32/VMS before 5.10.1", 1)
101 is_deeply($@->return, [0], "File::Copy returns zero on failure");
103 is($@->context, "list", "File::Copy called in list context");