=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libcddb-get-perl-2.28/CDDB_cache.pm-83- next unless -f $File::Find::name; libcddb-get-perl-2.28/CDDB_cache.pm:84: my $tid=`grep -H $sid $File::Find::name`; libcddb-get-perl-2.28/CDDB_cache.pm-85- if($tid =~ /\S+/) { ############################################## libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-184- libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl:185: my $in=`/bin/cat $savedir/$file`; libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-186- my $exit = $? >> 8; ############################################## libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-372- libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl:373: my $sql = "SELECT cddbid FROM $db->{table_cds} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-374- my $dbh = DBI->connect($db->{connect}->()) or die "cannot connect to db: $DBI::errstr"; ############################################## libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-379- if($option{O}) { libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl:380: my $sql = "DELETE FROM $db->{table_cds} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-381- my $sth = $dbh->prepare($sql); libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-382- my $r = $sth->execute or die "cannot delete from $db->{table_cds}: $DBI::errstr"; libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl:383: $sql = "DELETE FROM $db->{table_tracks} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/.pc/do-not-include-current-directory.patch/cddb.pl-384- $sth = $dbh->prepare($sql); ############################################## libcddb-get-perl-2.28/cddb.pl-184- libcddb-get-perl-2.28/cddb.pl:185: my $in=`/bin/cat $savedir/$file`; libcddb-get-perl-2.28/cddb.pl-186- my $exit = $? >> 8; ############################################## libcddb-get-perl-2.28/cddb.pl-372- libcddb-get-perl-2.28/cddb.pl:373: my $sql = "SELECT cddbid FROM $db->{table_cds} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/cddb.pl-374- my $dbh = DBI->connect($db->{connect}->()) or die "cannot connect to db: $DBI::errstr"; ############################################## libcddb-get-perl-2.28/cddb.pl-379- if($option{O}) { libcddb-get-perl-2.28/cddb.pl:380: my $sql = "DELETE FROM $db->{table_cds} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/cddb.pl-381- my $sth = $dbh->prepare($sql); libcddb-get-perl-2.28/cddb.pl-382- my $r = $sth->execute or die "cannot delete from $db->{table_cds}: $DBI::errstr"; libcddb-get-perl-2.28/cddb.pl:383: $sql = "DELETE FROM $db->{table_tracks} WHERE CDDBID = \'$cddbid\'"; libcddb-get-perl-2.28/cddb.pl-384- $sth = $dbh->prepare($sql);