8 lines
75 B
Perl
8 lines
75 B
Perl
|
$pi = 3.1415926;
|
||
|
|
|
||
|
|
format STDOUT =
|
||
|
|
@.## @.#######
|
||
|
|
$pi $pi
|
||
|
|
.
|
||
|
|
|
||
|
|
write;
|