It's good practice to seperate the input from the output. It makes it easy to change the output format in the future. For example,

my @primes = qw( 2 3 5 7 11 13 17 19 23 29 31 37 41
                43 47 53 59 61 67 71 73 79 83 89 97 );

local $, = ", ";
local $\ = "\n";
print @primes;
[download]

;)

As the claim was only to list primes below 100 easily, I found that solution actually quite O.K.

No need to praise it as "innovative", but also no need to mock it.

After all, the intend of the OP obviously dealt with small numbers and was not for example to show "a way to compute the 42th digit of the base 3 expansion of the 7th million prime number!"

When dealing with small primes (say up to 1,000,000 or even beyond), using precomputed lists maybe covenient. Moreso if such lists are easily available, e.g. from this site.