P:\test>perl -le"print qq[($_)] for @ARGV" "fred"""" """""bill"
(fred")
("bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred" "bill"
(fred)
(bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred"" "bill"
(fred")
(bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred"" ""bill"
(fred")
(bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred"" """bill"
(fred")
("bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred""" """bill"
(fred" "bill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred""a" ""a"bill"
(fred"a "abill)

P:\test>perl -le"print qq[($_)] for @ARGV" "fred"a"" "a""bill"
(freda)
(a"bill)