|
|
Sponsored Content
UNIX Standards and Benchmarks
UNIX & LINUX Benchmarks (Version 3.11)
Linux Benchmarks
ga 970a ud3 bench
Post 302609433 by thirnick on Tuesday 20th of March 2012 12:12:34 AM
03-20-2012
|
|
2 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
Can anybody provide me Pointers to Practice tests or any Material to prepare for Brainbench certification in Unix Shell Scripting? Also how good is this Certification for UNIX programmers. Is it worth it? I'm planning to take this certification in 2 weeks. Kindly let me know all the pros... (0 Replies)
Discussion started by: pavan_emani
0 Replies
2. Shell Programming and Scripting
Hi,
I have 2 sub routines for example.
use Benchmark 'cmpthese';
sub explicit {
print "\n print and calculate\n";
}
sub new_per_loop {
for (0..4){
print "\n print the loop \n";
}
}
cmpthese (10_000, {
'Explicit' => &explicit,
... (2 Replies)
Discussion started by: vanitham
2 Replies
LEARN ABOUT DEBIAN
test::unit::assertion::coderef
Test::Unit::Assertion::CodeRef(3pm) User Contributed Perl Documentation Test::Unit::Assertion::CodeRef(3pm) NAME
Test::Unit::Assertion::CodeRef - A delayed evaluation assertion using a Coderef SYNOPSIS
require Test::Unit::Assertion::CodeRef; my $assert_eq = Test::Unit::Assertion::CodeRef->new(sub { $_[0] eq $_[1] or Test::Unit::Failure->throw(-text => "Expected '$_[0]', got '$_[1]' "); }); $assert_eq->do_assertion('foo', 'bar'); Although this is how you'd use Test::Unit::Assertion::CodeRef directly, it is more usually used indirectly via Test::Unit::Test::assert, which instantiates a Test::Unit::Assertion::CodeRef when passed a Coderef as its first argument. IMPLEMENTS
Test::Unit::Assertion::CodeRef implements the Test::Unit::Assertion interface, which means it can be plugged into the Test::Unit::TestCase and friends' "assert" method with no ill effects. DESCRIPTION
This class is used by the framework to allow us to do assertions in a 'functional' manner. It is typically used generated automagically in code like: $self->assert(sub { $_[0] == $_[1] or $self->fail("Expected $_[0], got $_[1]"); }, 1, 2); (Note that if Damian Conway's Perl6 RFC for currying ever comes to pass then we'll be able to do this as: $self->assert(^1 == ^2 || $self->fail("Expected ^1, got ^2"), 1, 2) which will be nice...) If you have a working B::Deparse installed with your perl installation then, if an assertion fails, you'll see a listing of the decompiled coderef (which will be sadly devoid of comments, but should still be useful) AUTHOR
Copyright (c) 2001 Piers Cawley <pdcawley@iterative-software.com>. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. SEE ALSO
o Test::Unit::TestCase o Test::Unit::Assertion perl v5.8.8 2006-09-13 Test::Unit::Assertion::CodeRef(3pm)