examples/gsl_repl

   1 #!/usr/bin/perl -w
   2 use strict;
   3 use Devel::REPL;
   4
   5 package Devel::REPL::Plugin::GSL;
   6 use Devel::REPL::Plugin;
   7 sub BEFORE_PLUGIN
   8 {
   9     package Devel::REPL::Plugin::Packages::DefaultScratchpad;
  10     use aliased 'Math::GSL::Matrix';
  11     use aliased 'Math::GSL::Vector';
  12     use aliased 'Math::GSL::RNG';
  13     use aliased 'Math::GSL::QRNG';
  14     use Math::GSL::SF qw/:all/;
  15     use Math::GSL::CDF qw/:all/;
  16     use Math::GSL::Statistics qw/:all/;
  17     use Math::GSL::Const qw/:all/;
  18     use Data::Dumper;
  19     package Devel::REPL::Plugin::GSL;
  20 }
  21
  22 # FancyPrompt
  23 my @plugins = qw(GSL History LexEnv Colors Packages Timing);
  24 my $repl = Devel::REPL->new;
  25 $repl->load_plugin($_) for @plugins;
  26 $repl->run;