# expl1.pl  example  print string, integer, float
# optional  use  statements
use strict;
use warnings;
use diagnostics;

my $stra = "a string";
my $int13 = 13;
my $flt1 = 31.75;
my $flt2 = 1.23e+30;
    
print "perl  expl1.pl  running\n";
print "stra= $stra \n";
print "int13= $int13 \n";
print "first float = $flt1 \n";
print "big float = $flt2 \n";

print "expl1.pl finished\n";