#!/usr/bin/perl
@all = ($love{'fair'}, $war{'fair'});