7 lines
111 B
Perl
7 lines
111 B
Perl
|
#!c:/perl/bin
|
||
|
|
|
||
|
|
@ships=('B', 'T', 'H');
|
||
|
|
|
||
|
|
print "@ships[0] \n";
|
||
|
|
print "@ships[1] \n";
|
||
|
|
print "@ships[2] \n";
|