Declare and print an array in perl

 

@fruits = ('Grapes', 'Apple', 'Banana' );

print "@fruits";