> perl stdin-pipe.pl --opt
Neither a value was given for $opt, nor was specified on standard input. at stdin-pipe.pl line 25.

# This is interesting for "say Dumper ... Initial" still runs
# though "die" happens earlier.
$VAR1 = {
          'Initial, opt' => ''
        };