if 0;

There are a number of Perl scripts starting with:

#!/usr/local/bin/perl 
eval 'exec perl $0 ${1+"$@"}' if 0;

Why?