No, this won't actually work. From perldoc:

But if you try this:

  $class = ’Foo::Bar’;
  require $class;      # $class is not a bareword
  #or
  require "Foo::Bar";  # not a bareword because of the ""
[download]

The require function will look for the "Foo::Bar" file in the @INC array and will complain about not finding "Foo::Bar" there. In this case you can do:

  eval "require $class";
[download]

But you could do:

  my $module = 'Crunch/' . $company .'.pm';
  require $module;
[download]