Select Code to Download

#!/usr/bin/perl
use strict;
...
$line[1] = 'fre';
$line[2] = 2;
write;

package fred;

use encoding 'utf-8';

1;

a       b               c
€       fre <        2.00