/
usr
/
src
/
linux-headers-5.15.0-181
/
tools
/
testing
/
selftests
/
kselftest
/
/usr/src/linux-headers-5.15.0-181/tools/testing/selftests/kselftest
mkdir
upload
Name
Size
Mode
Actions
module.sh
1320
0755
edit
dl
rm
prefix.pl
475
0755
edit
dl
rm
runner.sh
2946
0644
edit
dl
rm
Edit:
/usr/src/linux-headers-5.15.0-181/tools/testing/selftests/kselftest/prefix.pl
(475B)
#!/usr/bin/env perl # SPDX-License-Identifier: GPL-2.0 # Prefix all lines with "# ", unbuffered. Command being piped in may need # to have unbuffering forced with "stdbuf -i0 -o0 -e0 $cmd". use strict; use IO::Handle; binmode STDIN; binmode STDOUT; STDOUT->autoflush(1); my $needed = 1; while (1) { my $char; my $bytes = sysread(STDIN, $char, 1); exit 0 if ($bytes == 0); if ($needed) { print "# "; $needed = 0; } print $char; $needed = 1 if ($char eq "\n"); }
Save
cmd:
run