Fix perlbrew.fish bug

__source_init() from perlbrew.fish has hit the eval () issue; replaced with pipe to . -