Skip to content

Instantly share code, notes, and snippets.

View l3talka's full-sized avatar

l3talka

2 followers · 0 following
View GitHub Profile
@l3talka
l3talka / chrome ext error
Created December 10, 2015 11:01
{"test_id":"12","task_id":"12","type":"site","site":"http://www.onliner.by/","answers":[{"id":"150","type":"finder","values":["270"],"time":3,"url":"http://www.onliner.by/","page_loading":2370,"found":1,"mousestat":[142,142,0,0,0],"page_bounce_rate":[{"active":true,"favIconUrl":"https://gc.onliner.by/favicon.ico","height":966,"highlighted":true,"id":931,"incognito":false,"index":10,"pinned":false,"selected":true,"status":"complete","title":"Onliner.by","url":"http://www.onliner.by/","width":1920,"windowId":1}]},{"id":"145","type":"anti_bot","values":["259"],"url":"http://www.onliner.by/","page_loading":2370,"time":3},{"id":"146","type":"anti_bot","values":["261"],"url":"http://www.onliner.by/","page_loading":2370,"time":3},{"id":"151","type":"finder","values":["271"],"time":3,"url":"http://auto.onliner.by/","page_loading":1091,"found":1,"mousestat":[166,166,0,0,0],"page_bounce_rate":[{"active":true,"favIconUrl":"https://gc.onliner.by/favicon.ico","height":966,"highlighted":true,"id":931,"incognito":false,"ind
@l3talka
l3talka / gist:9206742f794169deb1d8
Created February 2, 2015 11:39
#!/usr/bin/perl -w
use strict;
use warnings;
use Data::Dumper;
@l3talka
l3talka / gist:2937aa969dfc4982c1fe
Created October 10, 2014 11:26
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<head>
<meta charset='utf-8' />
<meta http-equiv='X-UA-Compatible' content='IE=Edge,chrome=1' />
<meta name='viewport' content='width=device-width, initial-scale=1.0' />
<link href='/css/bootstrap.min.css' media='screen' rel='stylesheet' />
<script src='/js/jquery.min.js' type='text/javascript'></script>
<script src='/js/bootstrap.min.js' type='text/javascript'></script>
<style type='text/css'>
body {
@l3talka
l3talka / gist:17d1a368b93b6d09ce0f
Created August 11, 2014 11:25
#########################
urlfetcher_checker.pl
#скрипт проверки урлфетчера на его работоспособность
#########################
#!/usr/bin/env perl
use strict;
use warnings;
use Redis;
use SO::URLFetcher;
@l3talka
l3talka / gist:ec5e88efb9800cfbec61
Created August 1, 2014 08:16
#!/usr/bin/env perl
use strict;
use warnings;
my $data;
$data->{int_key} = 3;
my $temp_scalar += $data->{test_key} if $data->{test_key};
@l3talka
l3talka / gist:8693483
Created January 29, 2014 18:05
- layout 'default';
- use utf8;
%div.row
%div.col-md-offset-3.col-md-8
%form.form-horizontal( role="form" )
%div.form-group
%label.col-sm-2.control-label( for="Country" ) Страна
%div.col-sm-6
%input( type="text" class="form-control" id="Country" required name="country" )
@l3talka
l3talka / gist:6537428
Created September 12, 2013 13:35
use 5.010000;
use ExtUtils::MakeMaker;
WriteMakefile(
NAME => 'SO::Box',
VERSION_FROM => 'lib/SO/Box.pm', # finds $VERSION
($] >= 5.005 ? ## Add these new keywords supported since 5.005
(ABSTRACT_FROM => 'lib/SO/Box.pm', # retrieve abstract from module
AUTHOR => 'Alexey Shrub <aleksey.shrub@sms-online.com>') : ()),
@l3talka
l3talka / gist:6512627
Created September 10, 2013 17:20
<?php if ( $_POST[url_main] AND $_POST[url_child] ) {
function get_info( $url_donor,$url_child ) {
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,base64_decode("aHR0cDovL3Nlby1tYXRpay5ydS9zZW8vY29tcGFyZS8="));
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS,
"d1=$url_donor&d2=$url_child");
@l3talka
l3talka / gist:6416207
Created September 2, 2013 19:04
<?php if ( $_POST[url_main] AND $_POST[url_child] ) {
function get_info( $url_donor,$url_child ) {
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,base64_decode("aHR0cDovL3Nlby1tYXRpay5ydS9zZW8vY29tcGFyZS8="));
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS,
"d1=$url_donor&d2=$url_child");
@l3talka
l3talka / gist:5918042
Created July 3, 2013 13:56
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] at /usr/share/perl5/Hash/Merge.pm line 100, referer: http://li.aqq.me/
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] \teval {...} called at /usr/share/perl5/Hash/Merge.pm line 100, referer: http://li.aqq.me/
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] \tHash::Merge::_get_obj called at /usr/share/perl5/Hash/Merge.pm line 205, referer: http://li.aqq.me/
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] \tHash::Merge::_merge_hashes('HASH(0x98d9e70)', 'HASH(0x9635644)') called at /usr/share/perl5/Hash/Merge.pm line 35, referer: http://li.aqq.me/
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] \tHash::Merge::__ANON__('HASH(0x98d9e70)', 'HASH(0x9635644)') called at /usr/share/perl5/Hash/Merge.pm line 198, referer: http://li.aqq.me/
[Wed Jul 03 16:55:41 2013] [error] [client 127.0.0.1] \tHash::Merge::merge('Hash::Merge=HASH(0x902bd0c)', 'HASH(0x98d9e70)', 'HASH(0x9635644)') called at /www/lib/SO/Config.pm line 80, referer: http://li.a