Even if only for the sake of TMTOWTDI and learning. :)

#!/usr/bin/perl

use 5.010;
use strict;
use warnings;

my $stillness = [

    "Every want without a pleasure.",
    "Cries to each beyond unheard.",
    "Softly spun, bound in isolation",
    "and placed in the abundant caress",
    "of an infinite stillness.",

];
    
foreach my $storms (@$stillness) {
        say "$storms";
    };
[download]