#!/bin/sh
perl -e 'for($i=0;$i<40000000;$i++) {}'
