P:\>perl58 -we"my $x,$y, $z;"
Parentheses missing around "my" list at -e line 1.
Useless use of a variable in void context at -e line 1.
Useless use of a variable in void context at -e line 1.
Name "main::y" used only once: possible typo at -e line 1.
Name "main::z" used only once: possible typo at -e line 1.
##</code><code>##

my($x); 
$y;
$z;

##</code><code>##

P:\>perl58 -mO=Deparse,-p -we" my $name,$serial,$maxlen,$flags,$fstype;"
Parentheses missing around "my" list at -e line 1.
Useless use of a variable in void context at -e line 1.
Useless use of a variable in void context at -e line 1.
Useless use of a variable in void context at -e line 1.
Useless use of a variable in void context at -e line 1.
Name "main::serial" used only once: possible typo at -e line 1.
Name "main::maxlen" used only once: possible typo at -e line 1.
Name "main::flags" used only once: possible typo at -e line 1.
Name "main::fstype" used only once: possible typo at -e line 1.
BEGIN { $^W = 1; }
(my($name), $serial, $maxlen, $flags, $fstype);
-e syntax OK