7 lines
62 B
Perl
7 lines
62 B
Perl
while (<>)
|
|
{
|
|
if (/./ && !/^#pragma/)
|
|
{
|
|
print $_
|
|
}
|
|
} |