===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libmailtools-perl-2.21/lib/Mail/Mailer/testfile.pm-21-
libmailtools-perl-2.21/lib/Mail/Mailer/testfile.pm:22:sub exec($$$)
libmailtools-perl-2.21/lib/Mail/Mailer/testfile.pm-23-{ my ($self, $exe, $args, $to) = @_;
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm-16-
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm:17:sub exec($$$$)
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm-18-{ my($self, $exe, $args, $to, $sender) = @_;
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm-26-
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm:27: exec( $exe, '-t', @$args );
libmailtools-perl-2.21/lib/Mail/Mailer/sendmail.pm-28-}
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm-16-
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm:17:sub exec($$$$)
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm-18-{ my($self, $exe, $args, $to, $sender) = @_;
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm-20-
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm:21: exec($exe, (defined $address ? "-f$address" : ()));
libmailtools-perl-2.21/lib/Mail/Mailer/qmail.pm-22- die "ERROR: cannot run $exe: $!";
##############################################
libmailtools-perl-2.21/lib/Mail/Header.pm-193- if($where < 0)
libmailtools-perl-2.21/lib/Mail/Header.pm:194: { $where = @{$self->{mail_hdr_list}} + $where + 1;
libmailtools-perl-2.21/lib/Mail/Header.pm:195: $where = 0 if $where < 0;
libmailtools-perl-2.21/lib/Mail/Header.pm-196- }
libmailtools-perl-2.21/lib/Mail/Header.pm:197: elsif($where >= @{$self->{mail_hdr_list}})
libmailtools-perl-2.21/lib/Mail/Header.pm:198: { $where = @{$self->{mail_hdr_list}};
libmailtools-perl-2.21/lib/Mail/Header.pm-199- }
libmailtools-perl-2.21/lib/Mail/Header.pm-200-
libmailtools-perl-2.21/lib/Mail/Header.pm:201: my $atend = $where == @{$self->{mail_hdr_list}};
libmailtools-perl-2.21/lib/Mail/Header.pm-202- splice @{$self->{mail_hdr_list}}, $where, 0, $line;
##############################################
libmailtools-perl-2.21/lib/Mail/Address.pod-11-
libmailtools-perl-2.21/lib/Mail/Address.pod:12: foreach $addr (@addrs) {
libmailtools-perl-2.21/lib/Mail/Address.pod-13- print $addr->format,"\n";
##############################################
libmailtools-perl-2.21/lib/Mail/Internet.pm-328- { my %cc;
libmailtools-perl-2.21/lib/Mail/Internet.pm:329: foreach my $addr (Mail::Address->parse($self->get('To'), $self->get('Cc')))
libmailtools-perl-2.21/lib/Mail/Internet.pm-330- { my $lc = lc $addr->address;
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer.pm-154- # this is a setup!!!
libmailtools-perl-2.21/lib/Mail/Mailer.pm:155: unless($self->exec($exe, $args, \@to, $sender))
libmailtools-perl-2.21/lib/Mail/Mailer.pm-156- { warn $!; # setup failed
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer.pm-162- { # Sending is handled by a subclass
libmailtools-perl-2.21/lib/Mail/Mailer.pm:163: $self->exec(undef, $args, \@to)
libmailtools-perl-2.21/lib/Mail/Mailer.pm-164- or die $!;
##############################################
libmailtools-perl-2.21/lib/Mail/Mailer.pm-179-
libmailtools-perl-2.21/lib/Mail/Mailer.pm:180:sub exec($$$$)
libmailtools-perl-2.21/lib/Mail/Mailer.pm-181-{ my($self, $exe, $args, $to, $sender) = @_;
##############################################
libmailtools-perl-2.21/examples/rplyto_demo.PL-31-
libmailtools-perl-2.21/examples/rplyto_demo.PL:32:warn "$editor :$!\n" if (system("$editor $file"));
libmailtools-perl-2.21/examples/rplyto_demo.PL-33-
##############################################
libmailtools-perl-2.21/examples/forwd_demo.PL-55-
libmailtools-perl-2.21/examples/forwd_demo.PL:56:warn "$editor :$!\n" if (system("$editor $file"));
libmailtools-perl-2.21/examples/forwd_demo.PL-57-
##############################################
libmailtools-perl-2.21/debian/rules-14- cd $(CURDIR)/lib && \
libmailtools-perl-2.21/debian/rules:15: (for i in Mail/*.pod; do echo Mail::`basename $$i .pod` ; pod2text $$i | $(PERL) -ne '$$/=""; s/^DESCRIPTION// && print'; done) >> $(CURDIR)/debian/OVERVIEW
libmailtools-perl-2.21/debian/rules-16-
##############################################
libmailtools-perl-2.21/.pc/strip-extra-fields.patch/lib/Mail/Internet.pm-328- { my %cc;
libmailtools-perl-2.21/.pc/strip-extra-fields.patch/lib/Mail/Internet.pm:329: foreach my $addr (Mail::Address->parse($self->get('To'), $self->get('Cc')))
libmailtools-perl-2.21/.pc/strip-extra-fields.patch/lib/Mail/Internet.pm-330- { my $lc = lc $addr->address;
##############################################
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-154- # this is a setup!!!
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm:155: unless($self->exec($exe, $args, \@to, $sender))
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-156- { warn $!; # setup failed
##############################################
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-162- { # Sending is handled by a subclass
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm:163: $self->exec(undef, $args, \@to)
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-164- or die $!;
##############################################
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-179-
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm:180:sub exec($$$$)
libmailtools-perl-2.21/.pc/sendmail-path.patch/lib/Mail/Mailer.pm-181-{ my($self, $exe, $args, $to, $sender) = @_;