=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libxml-smart-perl-1.78/t/base_tests_for_objcopy.t-862- libxml-smart-perl-1.78/t/base_tests_for_objcopy.t:863: my $data = qq`<?xml version="1.0" encoding="iso-8859-1"?><code>$wild</code>`; libxml-smart-perl-1.78/t/base_tests_for_objcopy.t-864- ############################################## libxml-smart-perl-1.78/t/base_tests.t-813- libxml-smart-perl-1.78/t/base_tests.t:814: my $data = qq`<?xml version="1.0" encoding="iso-8859-1"?><code>$wild</code>`; libxml-smart-perl-1.78/t/base_tests.t-815- ############################################## libxml-smart-perl-1.78/t/base_tests_for_mem_leak.t-860- libxml-smart-perl-1.78/t/base_tests_for_mem_leak.t:861: my $data = qq`<?xml version="1.0" encoding="iso-8859-1"?><code>$wild</code>`; libxml-smart-perl-1.78/t/base_tests_for_mem_leak.t-862- ############################################## libxml-smart-perl-1.78/t/base_tests_multi_obj.t-823- libxml-smart-perl-1.78/t/base_tests_multi_obj.t:824: my $data = qq`<?xml version="1.0" encoding="iso-8859-1"?><code>$wild</code>`; libxml-smart-perl-1.78/t/base_tests_multi_obj.t-825- ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-132- libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:133: my $metagen = qq`\n<?meta name="GENERATOR" content="XML::Smart/$XML::Smart::VERSION$wild Perl/$] [$^O]" ?>` ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-134- if ( $args{nometagen} ) { $metagen = '' ;} ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-140- libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:141: my $xml = qq`<?xml version="1.0" encoding="$enc"$length ?>` ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-142- ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-387- my $cont = $$tree{$Key} ; &_add_basic_entity($cont) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:388: $tags .= qq`$ident<$k>$cont</$k>` ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-389- } libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:390: elsif ($tp == 3) { $tags .= qq`$ident<$k><![CDATA[$$tree{$Key}]]></$k>`;} libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-391- elsif ($tp == 4) { ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-394- $base64 =~ s/\s$//s ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:395: $tags .= qq`$ident<$k dt:dt="binary.base64">$base64</$k>`; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-396- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-453- if (!@all_keys) { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:454: $$data .= qq`$ident<$tag/>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-455- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-457- if( $args =~ /dt\:dt="binary.base64"/ and $decode ) { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:458: $$data .= qq`$ident<$tag>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-459- require XML::Smart::Base64 ; ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-461- } else { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:462: $$data .= qq`$ident<$tag$args>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-463- $$data .= $tags ; ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-465- $$data .= $ident if !$cont ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:466: $$data .= qq`</$tag>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-467- } libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-468- elsif ($args ne '') { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:469: $$data .= qq`$ident<$tag$args/>`; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-470- } libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-471- elsif ($tags ne '') { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:472: $$data .= qq`$ident<$tag>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-473- $$data .= $tags ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-474- $$data .= $ident if !$cont ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:475: $$data .= qq`</$tag>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-476- } libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-477- else { libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:478: $$data .= qq`$ident<$tag></$tag>` if $tag ne '' ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-479- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-526- &_add_basic_entity($cont) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:527: $tags .= qq`$ident<$tag>$cont</$tag>`; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-528- $v = $cont if $c == 1 ; ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-531- $c++ ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:532: $tags .= qq`$ident<$tag><![CDATA[$value]]></$tag>`; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-533- $v = $value if $c == 1 ; ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-539- $base64 =~ s/\s$//s ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:540: $tags .= qq`$ident<$tag dt:dt="binary.base64">$base64</$tag>`; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-541- $v = $value if $c == 1 ; ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-641- _reset_sig_warn() ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:642: return( qq`"$data"` ) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-643- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-647- _reset_sig_warn() ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:648: return( qq`"$data"` ) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-649- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-652- _reset_sig_warn() ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:653: return( qq`'$data'` ) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-654- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-656- _reset_sig_warn() ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:657: return( qq`"$data"` ) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-658- } ############################################## libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-660- _reset_sig_warn() ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm:661: return( qq`"$data"` ) ; libxml-smart-perl-1.78/lib/XML/Smart/Data.pm-662-