#!/usr/bin/perl -wT
use strict;
use Statistics::Lite qw(stddev);

my @data = 20..30;
my $standard_deviation = stddev(@data);