Commit | Line | Data |
---|---|---|
1 | package Psh::Builtins::Set; | |
2 | ||
3 | require Psh::Util; | |
4 | ||
5 | =item * C<set> | |
6 | ||
7 | Return the list of the variables in the environment. This cannot as yet be | |
8 | used to set internal options (e.g. noclobber) but may be able to in future versions. | |
9 | ||
10 | =cut | |
11 | ||
12 | sub bi_set | |
13 | { | |
14 | foreach (sort keys %ENV) { | |
15 | print "$_=$ENV{$_}\n"; | |
16 | } | |
17 | ||
18 | return (1,undef); | |
19 | } | |
20 | ||
21 | 1; |