mirror of
https://github.com/helix-editor/helix
synced 2026-07-26 23:00:55 +02:00
Blaž Hrastnik
31 lines
317 B
Perl
31 lines
317 B
Perl
use strict;
|
|
|
|
sub greet {
|
|
my ($name) = @_;
|
|
print "hello, $name\n";
|
|
}
|
|
|
|
if ($x > 0) {
|
|
print "positive\n";
|
|
} elsif ($x < 0) {
|
|
print "negative\n";
|
|
} else {
|
|
print "zero\n";
|
|
}
|
|
|
|
for my $i (0 .. 10) {
|
|
print "$i\n";
|
|
}
|
|
|
|
while ($n > 0) {
|
|
$n--;
|
|
}
|
|
|
|
my $config = {
|
|
name => "helix",
|
|
list => [
|
|
1,
|
|
2,
|
|
],
|
|
};
|