It was motivated by `ddclient`:

* `return <<`:
https://github.com/ddclient/ddclient/blob/e0611ab192d6b8d3d2b09d6868d063ca5591ad02/ddclient.in#L7200-L7223

* `fun(<<)` (although this particular example is not handled by this PR due to 
string literal preceding `<<`):
https://github.com/ddclient/ddclient/blob/e0611ab192d6b8d3d2b09d6868d063ca5591ad02/ddclient.in#L2476-L2479

For a sample perl script:
```perl
#!/usr/bin/perl

use strict;

$a = <<"EOS";
 use a proxy;
EOS

my $a = <<"EOS";
 use b proxy;
EOS

my $a .= <<"EOS";
 use c proxy;
EOS

sub f {
    return <<"EOS";
    use d proxy
EOS
}

f(<<"EOS");
    use e proxy
EOS
```

Output before change:
```
perl(d)
perl(e)
perl(strict)
```

Output after change:
```
perl(strict)
```

-- 
Reply to this email directly or view it on GitHub:
https://github.com/rpm-software-management/rpm/pull/2813#issuecomment-1852754175
You are receiving this because you are subscribed to this thread.

Message ID: <rpm-software-management/rpm/pull/2813/c1852754...@github.com>
_______________________________________________
Rpm-maint mailing list
Rpm-maint@lists.rpm.org
http://lists.rpm.org/mailman/listinfo/rpm-maint

Reply via email to