Lines Matching full:should
29 ok( -s 'mkboot.bso', 'Mkbootstrap should backup the .bs file' );
36 is( $file_is_ready, 'meaningless text', 'backup should be a perfect copy' );
42 ok( !( -f 'fakeboot.bso' ), 'Mkbootstrap should not backup an empty file' );
47 # with $Verbose set, it should print status messages about libraries
50 is( $out->read, "\tbsloadlibs=\n", 'should report libraries in Verbose mode' );
53 like( $out->read, qr/bsloadlibs=foo/, 'should still report libraries' );
66 ok( $required, 'baseext_BS file should be require()d' );
84 like( $@, qr/Unable to open dasboot\.bs/, 'should die given bad filename' );
90 is( $@, '', 'should not die, given good filename' );
94 like( $read, qr/Writing dasboot.bs/, 'should print status' );
95 like( $read, qr/containing: my/, 'should print verbose status on request' );
99 ok( $file_is_ready, 'should have written a new .bs file' );
108 # filename should be in header
109 like( $file, qr/# dasboot DynaLoader/, 'file should have boilerplate' );
111 # should print arguments within this array
112 like( $file, qr/qw\(myarg\);/, 'should have written array to file' );
130 is( $@, '', 'should be able to open a file again');
139 is( $out->read, "Writing dasboot.bs\n", 'should hush without Verbose set' );
142 like( $file, qr/dl_findfile.+Larry/s, 'should load libraries if needed' );
143 like( $file, qr/Wall\n1;\n/ms, 'should write $DynaLoader::bscode if set' );