[ Index ] |
PHP Cross Reference of Unnamed Project |
[Summary view] [Print] [Text view]
1 # 2 # This library is no longer being maintained, and is included for backward 3 # compatibility with Perl 4 programs which may require it. 4 # 5 # In particular, this should not be used as an example of modern Perl 6 # programming techniques. 7 # 8 # Suggested alternative: IO::Handle 9 # 10 ;# Usage: &flush(FILEHANDLE) 11 ;# flushes the named filehandle 12 13 ;# Usage: &printflush(FILEHANDLE, "prompt: ") 14 ;# prints arguments and flushes filehandle 15 16 sub flush { 17 local($old) = select(shift); 18 $| = 1; 19 print ""; 20 $| = 0; 21 select($old); 22 } 23 24 sub printflush { 25 local($old) = select(shift); 26 $| = 1; 27 print @_; 28 $| = 0; 29 select($old); 30 } 31 32 1;
title
Description
Body
title
Description
Body
title
Description
Body
title
Body
Generated: Tue Mar 17 22:47:18 2015 | Cross-referenced by PHPXref 0.7.1 |