===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libdbix-xmlmessage-perl-0.05/README-63- my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/README:64: $msg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/README-65-
##############################################
libdbix-xmlmessage-perl-0.05/README-128- my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/README:129: $xmlmsg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/README-130- print $xmlmsg->output_message();
##############################################
libdbix-xmlmessage-perl-0.05/README-655-
libdbix-xmlmessage-perl-0.05/README:656: $xmsg->rexec ($dbh, $global_hash_ref)
libdbix-xmlmessage-perl-0.05/README-657-
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.html-116- my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/XMLMessage.html:117: $msg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/XMLMessage.html-118-</PRE>
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.html-179-<PRE> my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/XMLMessage.html:180: $xmlmsg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/XMLMessage.html-181- print $xmlmsg->output_message();
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.html-737-<P>
libdbix-xmlmessage-perl-0.05/XMLMessage.html:738:<PRE> $xmsg->rexec ($dbh, $global_hash_ref)
libdbix-xmlmessage-perl-0.05/XMLMessage.html-739-</PRE>
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-744- if ( defined $el->{EXPR} ) {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:745: $where .= $el->{EXPR};
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-746- } else {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:747: $where .= $el->{NAME};
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-748- }
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-754- $val = $self->format_value($el,$val);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:755: $where .= $val;
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-756- }
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-758- if ( $node->{'WHERE_CLAUSE'} ) {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:759: $where .= " and " if ( $where );
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:760: $where .= $node->{'WHERE_CLAUSE'};
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-761- }
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-762- # Cut off the initial 'and'
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:763: $where = substr ($where, 4) if ($where);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-764- return $where;
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-804- # WHERE clause doesn't make sence without FROM
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:805: my $where = $self->create_where ($node, $href, $inix, $resix);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-806- $sql .= "\nWHERE $where";
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-890- chop $sql;
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:891: my $where = $self->create_where ($node, $href, $inix, $resix);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-892- $sql = "UPDATE $node->{TABLE} set $sql where $where";
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1006- } elsif ( /EXEC/ ) {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:1007: $sql = $self->create_exec ($node, $href, $dbh, $inix, $resix);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1008- $self->trace ("SQL = $sql\n");
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1180- # Execute for yourself
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:1181: $success = $self->exec ($node, $dbh, $href);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1182- foreach $el ( @{$node->{'Kids'}} ) {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1183- if ( (ref $el) =~ /::REFERENCE$/ || (ref $el) =~ /::CHILD$/ ) {
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:1184: $success &= $self->rexec ($dbh, $href, $el);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1185- } }
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1605- my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:1606: $msg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1607-
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1654- my $dbh = DBI->connect('dbi:Sybase:server=x;database=master','sa','secret');
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:1655: $xmlmsg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-1656- print $xmlmsg->output_message();
##############################################
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-2029-
libdbix-xmlmessage-perl-0.05/XMLMessage.pm:2030: $xmsg->rexec ($dbh, $global_hash_ref)
libdbix-xmlmessage-perl-0.05/XMLMessage.pm-2031-
##############################################
libdbix-xmlmessage-perl-0.05/sybase.t.removed-33-# || die $DBI::errstr;
libdbix-xmlmessage-perl-0.05/sybase.t.removed:34:# $msg->rexec ($dbh, $ghash);
libdbix-xmlmessage-perl-0.05/sybase.t.removed-35-# my $out = $msg->output_xml(0,0);