pastebin

Paste #81970: Untitled ASCII paste by 124.126.136.47

#!/usr/bin/perl -w
use strict;
use 5.16.0;

my $end;
my @all;
while (<>) {
    @all = split ",", $_;
    say $all[-1];
    $end = $all[-1];
}

ASCII Bash C C++ C# Java Javascript Css Lua Perl PHP Python Ruby SQL Visual Basic XML/HTML

Private
Wrap long lines

1 + 1 =