#!/usr/bin/perl
	
@_ = ("proton","neutron","electron");
foreach ()
  {
    print ($_."\n");
  }

