atom-beautify/examples/simple-jsbeautifyrc/perl/expected/test.pl

#!/usr/bin/env perl

use strict;
use warnings;

if(1){
my $x = 'y';
my $foo = 'bar';
# comment

print('Hello, '.'World!')
}