===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
liburi-todisk-perl-1.12/t/02_main.t-70-is( $clone->uri, 'http://foo.com/', '->uri returns expected value' );
liburi-todisk-perl-1.12/t/02_main.t:71:isnt( refaddr($clone), refaddr($location), 'Clone is different to original' );
liburi-todisk-perl-1.12/t/02_main.t-72-
##############################################
liburi-todisk-perl-1.12/t/02_main.t-75-isa_ok( $param1, 'URI::ToDisk' );
liburi-todisk-perl-1.12/t/02_main.t:76:is( refaddr($param1), refaddr($location), '->param(Location) returns the same location' );
liburi-todisk-perl-1.12/t/02_main.t-77-is_deeply( $param1, $location, 'Locations match' );
##############################################
liburi-todisk-perl-1.12/t/02_main.t-93-is_normal_location( $file );
liburi-todisk-perl-1.12/t/02_main.t:94:isnt( refaddr($location), refaddr($file), '->catfile returns a new object' );
liburi-todisk-perl-1.12/t/02_main.t-95-is( $file->path, $path3, '->path gives expected value' );
##############################################
liburi-todisk-perl-1.12/t/02_main.t-109-is_normal_location( $file );
liburi-todisk-perl-1.12/t/02_main.t:110:isnt( refaddr($location), refaddr($dir), '->catfile returns a new object' );
liburi-todisk-perl-1.12/t/02_main.t-111-is( $dir->path, $path4, '->path gives expected value' );
##############################################
liburi-todisk-perl-1.12/t/02_main.t-136-	isa_ok( $object->URI, 'URI' );
liburi-todisk-perl-1.12/t/02_main.t:137:	isnt(   refaddr($object->URI), refaddr($object->URI), '->URI returns a clone' );
liburi-todisk-perl-1.12/t/02_main.t-138-	ok(     defined $object->uri, '->uri returns defined' );
##############################################
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm-128-	}
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm:129:	if ( eval($ExtUtils::MakeMaker::VERSION) >= 6.10 ) {
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm-130-		$args->{NO_META} = 1;
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm-131-	}
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm:132:	if ( eval($ExtUtils::MakeMaker::VERSION) > 6.17 and $self->sign ) {
liburi-todisk-perl-1.12/inc/Module/Install/Makefile.pm-133-		$args->{SIGN} = 1;
##############################################
liburi-todisk-perl-1.12/inc/Module/Install/Fetch.pm-84-    return if exists $args{size} and -s $file != $args{size};
liburi-todisk-perl-1.12/inc/Module/Install/Fetch.pm:85:    system($args{run}) if exists $args{run};
liburi-todisk-perl-1.12/inc/Module/Install/Fetch.pm-86-    unlink($file) if $args{remove};