[ create a new paste ] login | about

Link: http://codepad.org/FOYBhI2x    [ raw code | output | fork ]

Perl, pasted on Mar 6:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
given($LineTemp[1])                        # check the list format
{
    when 0
    {
        for($i = 0; $i <= $#ListData; $i++)
        {
        print "a";
        }
    }
    default
    {
        die "Error: Improper value for list format.  Only 0-4 are valid.";
    }
}


Output:
1
2
3
4
5
6
7
Number found where operator expected at line 3, near "when 0"
	(Do you need to predeclare when?)
syntax error at line 2, near ")                        # check the list format
{"
syntax error at line 6, near "++)
        "
Execution aborted due to compilation errors.


Create a new paste based on this one


Comments: