#!/usr/bin/perluse warnings;use strict;my $test = 30;print "strings", "numbers (", 3.6, ") and variables: ", $test, "\n";