$ perl OOM.pl
Segmentation fault (core dumped)

$ cat OOM.pl
#!/usr/bin/perl -w
use strict;
use warnings;

my %hash;
my $count;

$hash{$count++} = 'xyz'x999 while (1);