March 2002 Perl Hardware Store 32

8. Debug Printing of Lists

        @t = ('x', ' ', '=', ' ', '3.4', '& ', 'y', '', '=', '', '5')
        x = 3.4& y=5
        x   =   3.4 &  y  =  5
        $" = ')(';
        print "(@t)";
        (x)( )(=)( )(3.4)(& )(y)()(=)()(5)


Next Copyright © 2002 M-J. Dominus