# perldoc > Text::WrapI18N

---
type: CommandReference
command: Text::WrapI18N
mode: perldoc
section: ""
source: perldoc
---
## Quick Reference
- `use Text::WrapI18N qw(wrap $columns);` — Import the `wrap` function and `$columns` variable.
- `wrap($firstheader, $nextheader, @texts)` — Wrap text lines with headers, supporting multibyte, fullwidth, and combining characters, and languages without whitespace between words.

## Name
Text::WrapI18N - Line wrapping module with support for multibyte, fullwidth, and combining characters and languages without whitespaces between words

## Synopsis
perl
use Text::WrapI18N qw(wrap $columns);
wrap($firstheader, $nextheader, @texts);
## Options
- `$columns` — Target column width for wrapping. Set before calling `wrap`. Default is 76 (like `Text::Wrap`).
- `wrap($firstheader, $nextheader, @texts)` — Main subroutine. `$firstheader` prefixed to the first line, `$nextheader` to subsequent lines. Input texts must be in locale encoding.

## Examples
perl
use Text::WrapI18N qw(wrap $columns);
$columns = 80;
print wrap("> ", "> ", "This is a long text that needs wrapping and may contain multibyte characters like 日本語.");
## See Also
- [Text::Wrap](https://metacpan.org/pod/Text::Wrap) — Original line wrapping module.
- locale — System locale settings for encoding.