print $_->[0], "\n" for @Mdevices;