fork download
copy 
  1. cd $TMPDIR
  2. cat > segv.pl <<'_EOS_'
  3. require 'syscall.ph';
  4. open $fh,'<','/proc/self/maps';
  5. /^(\w+)-(\w+).*stack/ and ($b,$e)=(hex($1),hex($2)) while <$fh>;
  6. syscall &SYS_mprotect,$b,$e-$b,0;
  7. _EOS_
  8. perl segv.pl
Runtime error #stdin #stdout #stderr 0.03s 8144KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
./prog.sh: line 8: 28778 Segmentation fault      perl segv.pl
https://ideone.com/8Pmcks
perl SEGV sample
language:
Bash (bash 5.0.3)
created:
3 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!