IrIsT SQLi 2 Hex

[irist]

# ISlamic Republic Of Iran Security Team
#
#            Www.IrIsT.Ir
#
# Converting a SQLi 2 Hex
#!/usr/bin/perl

if ($#ARGV0) { 
  print Enter string to encode ; 
  $str= STDIN; chomp $str; 
} else { 
  $str = @ARGV[0]; 
} 

$enc = encode($str); print Hex Encoded value 0x$encn; 

sub encode { #Sub to encode 
@subvar= @_; 
my $sqlstr = $subvar[0]; 

@ASCII = unpack(C, $sqlstr); 
foreach $line (@ASCII) { 

$encoded = sprintf('%lx',$line); 
$encoded_command .= $encoded; 
} 
return $encoded_command; 
}

[Undeath]

Imi pare cunoscut.L-ai testat ? Nu am posibilitatea de a-l testa eu , chiar acum.