#!/usr/bin/perl

use strict;
use warnings;
use xyz qw(:DEFAULT @overall @electronics @safety);

print "OVERALL\n";
print "@overall\n";

print "ELECTRONICS\n";
print "@electronics\n";

print "SAFETY\n";
print "@safety\n";