mirror of
https://bitbucket.org/seefoe/dockerized-swg.git
synced 2026-10-04 19:13:03 -04:00
8 lines
88 B
Perl
Executable File
8 lines
88 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
while (<>)
|
|
{
|
|
print unless ($_ eq $lastline);
|
|
$lastline = $_;
|
|
}
|