Initial commit of OpenSPARC T2 design and verification files.

[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / site_perl / 5.8.0 / Psh / Builtins / Fallback / Env.pm

package Psh::Builtins::Fallback::Env;

=item * C<env>

Prints out the current environment

=cut

sub bi_env
{
       foreach my $key (sort keys %ENV) {
               Psh::Util::print_out("$key=$ENV{$key}\n");
       }
       return (1,undef);
}

1;