pavel-odintsov

#!/usr/bin/python

import json
import urllib2
import sys
import pprint

if len(sys.argv) != 2:
    sys.exit("Please provide params");

pavel-odintsov

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

// Author: [email protected] at FastVPS Eesti OU
// License: GPLv2

// This script allocate huge block of memory and fill it with random crap
// It's useful for checking kdump or ISP's with memory oversell :)
// Compilation: gcc memory_eater_ng.c -omemory_eater_ng

pavel-odintsov

#!/usr/bin/perl

use strict;
use warnings;

use Data::Dumper;
use Net::DNS::Resolver;
use List::Util qw(sum);

use lib "/opt/local/lib/perl5/vendor_perl/5.16.3";

pavel-odintsov

package qxp;
use strict;

# https://code.google.com/p/qxp/

sub H($){pack'H*',$_[0]}
sub by{map{[splice@_,1,$_[0]]}!($#_%$_[0])..$#_/$_[0]}
sub is($){$_ eq$_[0]}
sub cat{join'',@_}
sub list{@_}

pavel-odintsov

#!/bin/bash
 
INTERVAL="1"  # update interval in seconds
 
if [ -z "$1" ]; then
        echo
        echo usage: $0 [network-interface]
        echo
        echo e.g. $0 eth0
        echo

pavel-odintsov

#/usr/bin/perl

# Author Pavel Odintsov 
# [email protected]

use strict;
use warnings;


opendir my $dir, '/proc' or die "Can't open procfs";