1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
#!/usr/bin/env perl -w
use strict;
package Foo;
use Test::Cukes;
Given qr/^the pre-conditions is there$/, sub {
assert 1;
};
When qr/^it branches into the second level$/, sub {
assert 1;
};
Then qr/^the final shall be reached$/, sub {
assert 1;
};
package main;
use Test::Cukes;
feature(q{
Feature: Hendrerit iriure et dolore autem tincidunt enim autem
In order to Quis facilisis facilisis minim esse
As a dolor te duis.
I want to vel feugait vulputate molestie.
Scenario: Some random scenario text
Given the pre-conditions is there
When it branches into the second level
Then the final shall be reached
});
runtests;
|
