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"; |