Data Type Perl

#!/usr/bin/perl
use warnings;
print"Four sevens are ". 4*7 ."\n";