$ cat tye
print (3 + 4) * 5; print "\n";
print(3 + 4) * 5;  print "\n";
$ /opt/perl/5.000/bin/perl tye
7
7
$

##</code><code>##

$ /opt/perl/1.0.0/bin/perl tye
35
35
$

##</code><code>##

    push@array,"second","third","fourth","fifth";