valet@valet-comp:~/Documents/all$ grep --version
GNU grep 2.6.3

Copyright (C) 2009 Free Software Foundation, Inc.
Лицензия GPLv3+: GNU GPL версии 3 или новее <http://gnu.org/licenses/gpl.html>
Это свободное ПО: вы можете продавать и распространять его.
Нет НИКАКИХ ГАРАНТИЙ до степени, разрешённой законом.

valet@valet-comp:~/Documents/all$ perl --version

This is perl, v5.10.1 (*) built for x86_64-linux-gnu-thread-multi
(with 59 registered patches, see perl -V for more detail)

Copyright 1987-2009, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

valet@valet-comp:~/Documents/all$ awk --version
GNU Awk 3.1.7
Copyright (C) 1989, 1991-2009 Free Software Foundation.

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program. If not, see http://www.gnu.org/licenses/.
valet@valet-comp:~/Documents/all$ sed --version
GNU sed версия 4.2.1
Copyright (C) 2009 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE,
to the extent permitted by law.

GNU sed home page: <http://www.gnu.org/software/sed/>.
General help using GNU software: <http://www.gnu.org/gethelp/>.
E-mail bug reports to: <bug-gnu-utils@gnu.org>.
Be sure to include the word ``sed'' somewhere in the ``Subject:'' field.
valet@valet-comp:~/Documents/all$ python --version
Python 2.6.6
valet@valet-comp:~/Documents/all$ 

#!/bin/bash

REG_EXP="$1"
FILE="/tmp/megafile"
TEST_NUM=10

PYTHON_SCRIPT="/tmp/grep.py"

SED_CMD=(sed -ne "/$REG_EXP/p")
GREP_CMD=(grep "$REG_EXP")
PERL_CMD=(perl -ne "print if /$REG_EXP/")
AWK_CMD=(awk "/$REG_EXP/ { print }")
PYTHON_CMD=(python ${PYTHON_SCRIPT} "$REG_EXP")

GNU_TIME="/usr/bin/time"

LC_ALL=C

wc_l() {
    printf "wc -l for %6s: " "${1}" 
    "$@" $FILE | wc -l
}

rtime() {
    overall=0;
    for((i=0; i<$TEST_NUM; i++)); do
        test_time="$(${GNU_TIME} -p "$@" $FILE 2>&1 1>/dev/null | sed -n '/real\s\(.*\)/{s//\1/;p}')"
        overall="$(python -c "print '%10.5f' % ($overall + $test_time)" )"
    done
    python -c "print 'time for %6s: %6.2f (avg %5.2f)' % ('${1}', $overall, $overall / $TEST_NUM)"
}

wc_l "${GREP_CMD[@]}"
wc_l "${PERL_CMD[@]}" 
wc_l "${AWK_CMD[@]}"
wc_l "${SED_CMD[@]}"
wc_l "${PYTHON_CMD[@]}" 

echo "tests number: $TEST_NUM"

rtime "${GREP_CMD[@]}"
rtime "${PERL_CMD[@]}" 
rtime "${AWK_CMD[@]}"
rtime "${SED_CMD[@]}"
rtime "${PYTHON_CMD[@]}"

#!/usr/bin/env python
#_*_ coding: utf-8 _*_

import sys, re

patt = re.compile(sys.argv[1])

with open(sys.argv[2], 'r') as f:
    for line in f:
        if patt.search(line):
            print line,