Benjamin Renard commited on 2012-07-26 10:38:59
Showing 1 changed files, with 3 additions and 0 deletions.
... | ... |
@@ -33,6 +33,9 @@ my $databits = 8; # Between 5 and 8. Only 8 is commonly used. |
33 | 33 |
my $stopbits = 1; # Set to 1 or 2. 1 is most common. |
34 | 34 |
my $handshake = 'rts'; # Set to 'none', 'rts' or 'xoff' |
35 | 35 |
|
36 |
+# Auto-flush |
|
37 |
+local $| = 1; |
|
38 |
+ |
|
36 | 39 |
# Functions |
37 | 40 |
|
38 | 41 |
sub debug { |
39 | 42 |