$ perl -le 'use version; print $version::VERSION; system "ps -p $$ -o rss,vsz,comm"'
0.82
  RSS    VSZ COMMAND
 2476  24236 perl

##</code><code>##

$ strace -esetrlimit softlimit -m 25000000 perl -e1
setrlimit(RLIMIT_DATA, {rlim_cur=25000000, rlim_max=RLIM_INFINITY}) = 0
setrlimit(RLIMIT_STACK, {rlim_cur=25000000, rlim_max=RLIM_INFINITY}) = 0
setrlimit(RLIMIT_MEMLOCK, {rlim_cur=64*1024, rlim_max=64*1024}) = 0
setrlimit(RLIMIT_AS, {rlim_cur=25000000, rlim_max=RLIM_INFINITY}) = 0