#!/usr/bin/perl -w $def = ''; undef $notdef; if($def eq 'foo') { # Line 4 } elsif ($def eq 'bar') { } elsif ($notdef eq "RHS") { # Line 7 }