test/lisp/progmodes/cperl-mode-resources/cperl-bug-19709.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

# -------- bug#19709: input --------
my $a = func1(
    Module::test()
  );

my $b = func2(
    test()
);

my $c = func3(
    Module::test(),
);
# -------- bug#19709: expected output --------
my $a = func1(
    Module::test()
);

my $b = func2(
    test()
);

my $c = func3(
    Module::test(),
);
# -------- bug#19709: end --------