Perl Shell - A Solution

$prompt = '' if @ARGV || ! -t;

Recall:

• From the lines above, we know that if anything is in @ARGV, it is a script file that was passed to psh.
• || means "or" and ! means "not".
• -t is true the input is from a terminal and false if input is redirected from somewhere else (eg, a file or a pipe).