aggrolite · February 27, 2012 22:32
diff --git a/gistfile1.pl b/gistfile1.pl
 sub power {
    my ( $base, $exponent ) = @_;
    my $result = 1;
    for ( my $i = 0 ; $i < $exponent ; $i++ ) {
        $result = $result * $base;
    }
    return $result;
 }
	sub power {
	my ( $base, $exponent ) = @_;
	my $result = 1;
	for ( my $i = 0 ; $i < $exponent ; $i++ ) {
	$result = $result * $base;
	}
	return $result;
	}