https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=38375

--- Comment #13 from Magnus Enger <[email protected]> ---
And it looks like "split /\R/" should do the trick? 

POC: 

#!/usr/bin/perl
use Modern::Perl;
foreach my $string ( "a\r\nb", "a\rb", "a\nb" ) {
    say "==========";
    say $string;
    say "----------";
    my ( $a, $b ) = split /\R/, $string;
    say "$a + $b";
}

https://perldoc.perl.org/perlrebackslash#Misc

-- 
You are receiving this mail because:
You are watching all bug changes.
You are the assignee for the bug.
_______________________________________________
Koha-bugs mailing list
[email protected]
https://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-bugs
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/

Reply via email to