SCCH

use LWP::UserAgent;
print "Username => ";
$username = <STDIN>;
chomp($username);
$snapchat =  LWP::UserAgent->new();
$snapchat->default_header('User-Agent' => 'Snapchat/10.3.1.0 (SM-G900F; Android 5.0#G900FXXS1BPCL#21; gzip)');
$snapchat->default_header('Accept-Language' => 'en;q=0.9');
$response = $snapchat->post('https://app.snapchat.com/loq/find_users',{
    query_text => $username,
    req_token => '7674a1febcdfcc866e220e260439b6264db6f199f43c1c53b7f1d814ad26dd38511jc106e6bfogg7nea515fl?86a2375`9e7a56ca49ea11526d6380ebe256c0854976867d4e1ed91202313e92dfe0adcbc',
    timestamp => '1510581480000',
    username => 'snapcheckuser'
    }
    );
print $response->content();