#!/usr/bin/perl
use warnings;
use strict;

my $x = "0 but true";
my $y = "0 but whatever";

$x += 0;
$y += 0;
__END__

Prints:
Argument "0 but whatever" isn't numeric in 
addition (+) at C:\Projects_Perl\0buttrue.pl line 9.

Process completed successfully