Help for this page

Select Code to Download

Select or download this
```
 
my $w = $ENV{COLUMNS};
```
Select or download this
```
export COLUMNS
```

Select or download this


# get current width from environment
...
      $width = $w - 5;
    }