sub print_error {
    my ($fmt, @args) = @_;
    die 'ERROR: ', sprintf $fmt, @args;
}

##</code><code>##

'Start date (%s) cannot be after end date (%s)'
'Postcode (%s) contains invalid characters'
'ID is a required field'