$ perl -e '@ARGV ||= "."'
Can't modify array dereference in logical or assignment (||=) at -e line 1, at EOF