/
usr
/
lib64
/
perl5
/
vendor_perl
/
Filter
/
/usr/lib64/perl5/vendor_perl/Filter
mkdir
upload
Name
Size
Mode
Actions
Util/
-
0755
rm
cpp.pm
2186
0644
edit
dl
rm
decrypt.pm
2999
0644
edit
dl
rm
exec.pm
1256
0644
edit
dl
rm
sh.pm
1393
0644
edit
dl
rm
tee.pm
793
0644
edit
dl
rm
Edit:
/usr/lib64/perl5/vendor_perl/Filter/tee.pm
(793B)
package Filter::tee ; require 5.006 ; require XSLoader; our $VERSION = "1.58" ; XSLoader::load('Filter::tee'); 1; __END__ =head1 NAME Filter::tee - tee source filter =head1 SYNOPSIS use Filter::tee 'filename' ; use Filter::tee '>filename' ; use Filter::tee '>>filename' ; =head1 DESCRIPTION This filter copies all text from the line after the C<use> in the current source file to the file specified by the parameter C<filename>. By default and when the filename is prefixed with a '>' the output file will be emptied first if it already exists. If the output filename is prefixed with '>>' it will be opened for appending. This filter is useful as a debugging aid when developing other source filters. =head1 AUTHOR Paul Marquess =head1 DATE 20th June 1995. =cut
Save
cmd:
run